home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1989-04-22 | 37.9 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| dexvert
| Packed Font File Format (font/texPKFont)
| magic
| Supported |
| 100%
| file
| TeX font metric data (or the BBC computer by)
| default (weak)
| |
| 99%
| file
| data
| default
| |
| 100%
| xdgMime
| application/x-font-tex-tfm
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 00 12 f4 20 3e 20 | 24 2e 53 74 61 72 54 72 |..... > |$.StarTr|
|00000010| 65 6b 0d 00 0a 25 f4 20 | 41 64 61 70 74 65 64 20 |ek...%. |Adapted |
|00000020| 66 6f 72 20 74 68 65 20 | 42 42 43 20 63 6f 6d 70 |for the |BBC comp|
|00000030| 75 74 65 72 20 62 79 0d | 00 14 23 f4 20 54 2e 45 |uter by.|..#. T.E|
|00000040| 2e 4b 65 6e 6e 69 6e 67 | 74 6f 6e 2c 20 4e 6f 76 |.Kenning|ton, Nov|
|00000050| 20 31 39 38 33 3b 20 61 | 6e 64 0d 00 1e 26 f4 20 | 1983; a|nd...&. |
|00000060| 72 65 76 69 73 65 64 20 | 66 6f 72 20 41 72 63 68 |revised |for Arch|
|00000070| 69 6d 65 64 65 73 2c 20 | 41 75 67 20 31 39 38 38 |imedes, |Aug 1988|
|00000080| 0d 00 28 20 f4 20 62 79 | 20 4c 65 73 20 48 75 72 |..( . by| Les Hur|
|00000090| 73 74 2c 20 42 6f 75 72 | 6e 65 6d 6f 75 74 68 2e |st, Bour|nemouth.|
|000000a0| 0d 00 32 26 f4 20 47 72 | 61 70 68 69 63 61 6c 6c |..2&. Gr|aphicall|
|000000b0| 79 20 61 64 61 70 74 65 | 64 2f 52 65 77 72 69 74 |y adapte|d/Rewrit|
|000000c0| 74 65 6e 20 62 79 0d 00 | 3c 12 f4 20 41 6c 65 78 |ten by..|<.. Alex|
|000000d0| 20 48 6f 70 6b 69 6e 73 | 0d 00 46 15 f4 20 33 30 | Hopkins|..F.. 30|
|000000e0| 20 52 6f 64 6e 65 79 20 | 43 6c 6f 73 65 0d 00 50 | Rodney |Close..P|
|000000f0| 0d f4 20 47 6f 73 70 6f | 72 74 0d 00 5a 14 f4 20 |.. Gospo|rt..Z.. |
|00000100| 48 41 4e 54 53 20 50 4f | 31 33 20 38 45 4a 0d 00 |HANTS PO|13 8EJ..|
|00000110| 64 1d f4 20 4e 6f 76 65 | 6d 62 65 72 20 38 38 20 |d.. Nove|mber 88 |
|00000120| 2d 20 4d 61 72 63 68 20 | 38 39 2e 0d 00 6e 13 f4 |- March |89...n..|
|00000130| 20 56 65 72 73 69 6f 6e | 20 47 2f 31 2e 33 0d 00 | Version| G/1.3..|
|00000140| 78 05 3a 0d 00 82 0c eb | 20 31 32 20 3a 20 87 0d |x.:.....| 12 : ..|
|00000150| 00 8c 12 ee 20 85 20 f2 | 65 72 72 6f 72 20 3a 20 |.... . .|error : |
|00000160| e0 0d 00 96 05 3a 0d 00 | a0 23 f2 63 6f 6c 6f 75 |.....:..|.#.colou|
|00000170| 72 73 20 3a 20 f2 73 70 | 72 69 74 65 4c 6f 61 64 |rs : .sp|riteLoad|
|00000180| 20 3a 20 f2 73 65 74 75 | 70 0d 00 aa 05 3a 0d 00 | : .setu|p....:..|
|00000190| b4 05 f5 0d 00 be 09 f2 | 69 6e 69 74 0d 00 c8 10 |........|init....|
|000001a0| f2 65 6e 65 72 67 79 42 | 61 6e 6b 73 0d 00 d2 0f |.energyB|anks....|
|000001b0| f2 75 70 64 61 74 65 54 | 69 6d 65 0d 00 dc 0a f2 |.updateT|ime.....|
|000001c0| 69 6e 74 72 6f 0d 00 e6 | 0e f2 71 75 61 64 42 75 |intro...|..quadBu|
|000001d0| 69 6c 64 0d 00 f0 0e f2 | 75 70 64 61 74 65 50 6f |ild.....|updatePo|
|000001e0| 73 0d 00 fa 13 f2 73 68 | 6f 72 74 52 61 6e 67 65 |s.....sh|ortRange|
|000001f0| 53 63 61 6e 0d 01 04 05 | f5 0d 01 0e 17 ff 20 22 |Scan....|...... "|
|00000200| 46 58 20 32 31 20 39 22 | 20 3a 20 56 25 2b 3d 31 |FX 21 9"| : V%+=1|
|00000210| 0d 01 18 0e f2 63 6f 6e | 64 69 74 69 6f 6e 0d 01 |.....con|dition..|
|00000220| 22 0c f2 63 6f 6d 6d 61 | 6e 64 0d 01 2c 0c e7 20 |"..comma|nd..,.. |
|00000230| 44 25 3d 30 20 8c 0d 01 | 36 11 20 20 20 20 20 3a |D%=0 ...|6. :|
|00000240| 20 5a 3d b3 28 31 29 0d | 01 40 30 20 20 20 20 20 | Z=.(1).|.@0 |
|00000250| 3a 20 e7 20 5a 3e 2e 39 | 39 38 20 80 20 4e 45 55 |: . Z>.9|98 . NEU|
|00000260| 25 3d a3 20 8c 20 f2 6e | 65 75 74 72 6f 6e 20 3a |%=. . .n|eutron :|
|00000270| 20 e5 20 8d 44 72 41 0d | 01 4a 32 20 20 20 20 20 | . .DrA.|.J2 |
|00000280| 3a 20 e7 20 5a 3e 2e 39 | 39 36 20 80 20 44 49 4c |: . Z>.9|96 . DIL|
|00000290| 25 3d a3 20 8c 20 f2 64 | 69 6c 69 74 68 69 75 6d |%=. . .d|ilithium|
|000002a0| 20 3a 20 e5 20 8d 44 72 | 41 0d 01 54 2f 20 20 20 | : . .Dr|A..T/ |
|000002b0| 20 20 3a 20 e7 20 5a 3e | 2e 39 39 20 80 20 4d 59 | : . Z>|.99 . MY|
|000002c0| 53 25 3d a3 20 8c 20 f2 | 6d 79 73 74 65 72 79 20 |S%=. . .|mystery |
|000002d0| 3a 20 e5 20 8d 44 72 41 | 0d 01 5e 24 20 20 20 20 |: . .DrA|..^$ |
|000002e0| 20 3a 20 e7 20 5a 3e 30 | 2e 39 38 20 8c 20 f2 6e | : . Z>0|.98 . .n|
|000002f0| 6f 76 61 20 3a 20 e5 20 | 8d 44 72 41 0d 01 68 28 |ova : . |.DrA..h(|
|00000300| 20 20 20 20 20 3a 20 e7 | 20 5a 3c 2e 35 20 80 20 | : .| Z<.5 . |
|00000310| 56 25 3e 5a 25 20 8c 20 | f2 70 72 6f 62 65 52 65 |V%>Z% . |.probeRe|
|00000320| 74 75 72 6e 0d 01 72 05 | cd 0d 01 7c 24 e7 20 45 |turn..r.|...|$. E|
|00000330| 3c 31 20 80 20 53 3c 31 | 20 80 20 ac 20 44 65 61 |<1 . S<1| . . Dea|
|00000340| 64 25 20 8c 20 f2 64 65 | 61 64 28 31 29 0d 01 86 |d% . .de|ad(1)...|
|00000350| 0f e7 20 53 3c 31 20 8c | 20 53 3d 30 0d 01 90 0b |.. S<1 .| S=0....|
|00000360| fd 20 44 65 61 64 25 0d | 01 9a 07 fd 20 a3 0d 01 |. Dead%.|.... ...|
|00000370| a4 05 e0 0d 01 ae 05 3a | 0d 01 b8 10 dd 20 f2 71 |.......:|..... .q|
|00000380| 75 61 64 42 75 69 6c 64 | 0d 01 c2 26 58 3d 47 28 |uadBuild|...&X=G(|
|00000390| 51 31 2c 51 32 29 2a 2e | 30 31 20 3a 20 5a 28 51 |Q1,Q2)*.|01 : Z(Q|
|000003a0| 31 2c 51 32 29 3d 47 28 | 51 31 2c 51 32 29 0d 01 |1,Q2)=G(|Q1,Q2)..|
|000003b0| cc 1d 4b 33 3d a8 28 58 | 29 20 3a 20 42 33 3d a8 |..K3=.(X|) : B3=.|
|000003c0| 28 28 58 2d 4b 33 29 2a | 31 30 29 0d 01 d6 21 53 |((X-K3)*|10)...!S|
|000003d0| 33 3d 47 28 51 31 2c 51 | 32 29 2d a8 28 47 28 51 |3=G(Q1,Q|2)-.(G(Q|
|000003e0| 31 2c 51 32 29 2a 2e 31 | 29 2a 31 30 0d 01 e0 40 |1,Q2)*.1|)*10...@|
|000003f0| 51 24 28 29 3d 22 22 20 | 3a 20 e3 20 49 25 3d 31 |Q$()="" |: . I%=1|
|00000400| 20 b8 20 33 20 3a 20 4b | 28 49 25 2c 31 29 3d 30 | . 3 : K|(I%,1)=0|
|00000410| 20 3a 20 4b 28 49 25 2c | 32 29 3d 30 20 3a 20 4b | : K(I%,|2)=0 : K|
|00000420| 28 49 25 2c 33 29 3d 30 | 20 3a 20 ed 0d 01 ea 1a |(I%,3)=0| : .....|
|00000430| 51 24 28 53 31 2c 53 32 | 29 3d 22 65 6e 74 65 72 |Q$(S1,S2|)="enter|
|00000440| 70 72 69 73 65 22 0d 01 | f4 0c e7 20 4b 33 3e 30 |prise"..|... K3>0|
|00000450| 20 8c 0d 01 fe 16 20 20 | 20 20 20 3a 20 e3 20 49 | ..... | : . I|
|00000460| 25 3d 31 20 b8 20 4b 33 | 0d 02 08 25 20 20 20 20 |%=1 . K3|...% |
|00000470| 20 3a 20 f2 72 6e 64 20 | 3a 20 51 24 28 52 31 2c | : .rnd |: Q$(R1,|
|00000480| 52 32 29 3d 22 6b 6c 69 | 6e 67 6f 6e 22 0d 02 12 |R2)="kli|ngon"...|
|00000490| 35 20 20 20 20 20 3a 20 | 4b 28 49 25 2c 31 29 3d |5 : |K(I%,1)=|
|000004a0| 52 31 20 3a 20 4b 28 49 | 25 2c 32 29 3d 52 32 20 |R1 : K(I|%,2)=R2 |
|000004b0| 3a 20 4b 28 49 25 2c 33 | 29 3d 53 39 2b b3 28 33 |: K(I%,3|)=S9+.(3|
|000004c0| 35 29 0d 02 1c 0c 20 20 | 20 20 20 3a 20 ed 0d 02 |5).... | : ...|
|000004d0| 26 05 cd 0d 02 30 0c e7 | 20 42 33 3e 30 20 8c 0d |&....0..| B3>0 ..|
|000004e0| 02 3a 26 20 20 20 20 20 | 3a 20 f2 72 6e 64 20 3a |.:& |: .rnd :|
|000004f0| 20 51 24 28 52 31 2c 52 | 32 29 3d 22 73 74 61 72 | Q$(R1,R|2)="star|
|00000500| 62 61 73 65 22 0d 02 44 | 05 cd 0d 02 4e 0c e7 20 |base"..D|....N.. |
|00000510| 53 33 3e 30 20 8c 0d 02 | 58 16 20 20 20 20 20 3a |S3>0 ...|X. :|
|00000520| 20 e3 20 49 25 3d 31 20 | b8 20 53 33 0d 02 62 22 | . I%=1 |. S3..b"|
|00000530| 20 20 20 20 20 3a 20 f2 | 72 6e 64 20 3a 20 51 24 | : .|rnd : Q$|
|00000540| 28 52 31 2c 52 32 29 3d | 22 73 74 61 72 22 0d 02 |(R1,R2)=|"star"..|
|00000550| 6c 0c 20 20 20 20 20 3a | 20 ed 0d 02 76 05 cd 0d |l. :| ...v...|
|00000560| 02 80 0e f2 62 61 73 65 | 43 68 65 63 6b 0d 02 8a |....base|Check...|
|00000570| 05 e1 0d 02 94 05 3a 0d | 02 9e 0e dd 20 f2 63 6f |......:.|.... .co|
|00000580| 6d 6d 61 6e 64 0d 02 a8 | 14 4c 25 3d 30 20 3a 20 |mmand...|.L%=0 : |
|00000590| 4c 25 3d a4 6d 6f 75 73 | 65 0d 02 b2 05 3a 0d 02 |L%=.mous|e....:..|
|000005a0| bc 0b c8 8e 20 4c 25 20 | ca 0d 02 c6 27 c9 20 30 |.... L% |....'. 0|
|000005b0| 20 20 3a 20 f2 63 6c 65 | 61 72 28 33 29 20 3a 20 | : .cle|ar(3) : |
|000005c0| f2 63 6f 6d 6d 61 6e 64 | 49 6e 66 6f 20 3a 20 e1 |.command|Info : .|
|000005d0| 0d 02 d0 18 c9 20 31 20 | 20 3a 20 f2 64 61 6d 61 |..... 1 | : .dama|
|000005e0| 67 65 52 65 70 6f 72 74 | 0d 02 da 18 c9 20 32 20 |geReport|..... 2 |
|000005f0| 20 3a 20 f2 73 74 61 74 | 75 73 52 65 70 6f 72 74 | : .stat|usReport|
|00000600| 0d 02 e4 14 c9 20 33 20 | 20 3a 20 f2 69 6e 73 74 |..... 3 | : .inst|
|00000610| 72 75 63 74 0d 02 ee 1a | c9 20 34 20 20 3a 20 f2 |ruct....|. 4 : .|
|00000620| 73 68 6f 72 74 52 61 6e | 67 65 53 63 61 6e 0d 02 |shortRan|geScan..|
|00000630| f8 17 c9 20 35 20 20 3a | 20 f2 63 6f 6d 70 75 74 |... 5 :| .comput|
|00000640| 65 72 4d 61 70 0d 03 02 | 19 c9 20 36 20 20 3a 20 |erMap...|.. 6 : |
|00000650| f2 6c 6f 6e 67 52 61 6e | 67 65 53 63 61 6e 0d 03 |.longRan|geScan..|
|00000660| 0c 16 c9 20 37 20 20 3a | 20 f2 68 79 70 65 72 50 |... 7 :| .hyperP|
|00000670| 72 6f 62 65 0d 03 16 13 | c9 20 38 20 20 3a 20 f2 |robe....|. 8 : .|
|00000680| 70 68 61 73 6f 72 73 0d | 03 20 17 c9 20 39 20 20 |phasors.|. .. 9 |
|00000690| 3a 20 f2 73 63 61 6e 6e | 65 72 49 6e 66 6f 0d 03 |: .scann|erInfo..|
|000006a0| 2a 15 c9 20 31 30 20 3a | 20 f2 74 6f 72 70 65 64 |*.. 10 :| .torped|
|000006b0| 6f 65 73 0d 03 34 15 c9 | 20 31 31 20 3a 20 f2 70 |oes..4..| 11 : .p|
|000006c0| 68 6f 74 6f 6e 41 69 6d | 0d 03 3e 15 c9 20 31 32 |hotonAim|..>.. 12|
|000006d0| 20 3a 20 f2 64 65 66 6c | 65 63 74 6f 72 0d 03 48 | : .defl|ector..H|
|000006e0| 16 c9 20 31 33 20 3a 20 | f2 6e 61 76 69 67 61 74 |.. 13 : |.navigat|
|000006f0| 69 6f 6e 0d 03 52 1c c9 | 20 31 34 20 3a 20 f2 63 |ion..R..| 14 : .c|
|00000700| 6f 75 72 73 65 43 61 6c | 63 75 6c 61 74 6f 72 0d |ourseCal|culator.|
|00000710| 03 5c 05 cb 0d 03 66 0f | e7 20 44 65 61 64 25 20 |.\....f.|. Dead% |
|00000720| 8c 20 e1 0d 03 70 1d e7 | 20 4b 33 3e 30 20 80 20 |. ...p..| K3>0 . |
|00000730| b3 28 32 29 3d 31 20 8c | 20 f2 61 74 74 61 63 6b |.(2)=1 .| .attack|
|00000740| 0d 03 7a 0f e7 20 44 65 | 61 64 25 20 8c 20 e1 0d |..z.. De|ad% . ..|
|00000750| 03 84 18 e7 20 56 25 20 | 83 20 34 3d 30 20 8c 20 |.... V% |. 4=0 . |
|00000760| f2 72 65 70 6f 72 74 0d | 03 8e 05 e1 0d 03 98 05 |.report.|........|
|00000770| 3a 0d 03 a2 0c dd 20 a4 | 6d 6f 75 73 65 0d 03 ac |:..... .|mouse...|
|00000780| 0d ea 20 78 2c 79 2c 62 | 75 74 0d 03 b6 1a f5 20 |.. x,y,b|ut..... |
|00000790| 3a 20 c8 97 20 78 2c 79 | 2c 62 75 74 20 3a 20 fd |: .. x,y|,but : .|
|000007a0| 20 62 75 74 0d 03 c0 15 | e7 20 79 3e 31 31 36 20 | but....|. y>116 |
|000007b0| 80 20 79 3c 32 31 36 20 | 8c 0d 03 ca 18 e7 20 78 |. y<216 |...... x|
|000007c0| 3e 32 34 20 80 20 78 3c | 39 36 20 8c 20 4c 25 3d |>24 . x<|96 . L%=|
|000007d0| 31 0d 03 d4 19 e7 20 78 | 3e 39 36 20 80 20 78 3c |1..... x|>96 . x<|
|000007e0| 31 36 38 20 8c 20 4c 25 | 3d 32 0d 03 de 1a e7 20 |168 . L%|=2..... |
|000007f0| 78 3e 31 36 38 20 80 20 | 78 3c 32 35 30 20 8c 20 |x>168 . |x<250 . |
|00000800| 4c 25 3d 33 0d 03 e8 05 | cd 0d 03 f2 15 e7 20 79 |L%=3....|...... y|
|00000810| 3e 32 34 38 20 80 20 79 | 3c 33 31 36 20 8c 0d 03 |>248 . y|<316 ...|
|00000820| fc 1a e7 20 78 3e 32 38 | 38 20 80 20 78 3c 33 36 |... x>28|8 . x<36|
|00000830| 30 20 8c 20 4c 25 3d 34 | 0d 04 06 1a e7 20 78 3e |0 . L%=4|..... x>|
|00000840| 33 36 30 20 80 20 78 3c | 34 33 32 20 8c 20 4c 25 |360 . x<|432 . L%|
|00000850| 3d 35 0d 04 10 1a e7 20 | 78 3e 34 33 32 20 80 20 |=5..... |x>432 . |
|00000860| 78 3c 35 30 34 20 8c 20 | 4c 25 3d 36 0d 04 1a 1a |x<504 . |L%=6....|
|00000870| e7 20 78 3e 35 30 34 20 | 80 20 78 3c 35 37 36 20 |. x>504 |. x<576 |
|00000880| 8c 20 4c 25 3d 37 0d 04 | 24 1a e7 20 78 3e 36 31 |. L%=7..|$.. x>61|
|00000890| 36 20 80 20 78 3c 36 38 | 38 20 8c 20 4c 25 3d 38 |6 . x<68|8 . L%=8|
|000008a0| 0d 04 2e 1a e7 20 78 3e | 36 39 36 20 80 20 78 3c |..... x>|696 . x<|
|000008b0| 37 36 38 20 8c 20 4c 25 | 3d 39 0d 04 38 1b e7 20 |768 . L%|=9..8.. |
|000008c0| 78 3e 37 37 36 20 80 20 | 78 3c 38 34 38 20 8c 20 |x>776 . |x<848 . |
|000008d0| 4c 25 3d 31 30 0d 04 42 | 1b e7 20 78 3e 38 35 36 |L%=10..B|.. x>856|
|000008e0| 20 80 20 78 3c 39 32 38 | 20 8c 20 4c 25 3d 31 31 | . x<928| . L%=11|
|000008f0| 0d 04 4c 1c e7 20 78 3e | 39 33 36 20 80 20 78 3c |..L.. x>|936 . x<|
|00000900| 31 30 30 38 20 8c 20 4c | 25 3d 31 32 0d 04 56 1d |1008 . L|%=12..V.|
|00000910| e7 20 78 3e 31 30 36 38 | 20 80 20 78 3c 31 31 34 |. x>1068| . x<114|
|00000920| 30 20 8c 20 4c 25 3d 31 | 33 0d 04 60 1d e7 20 78 |0 . L%=1|3..`.. x|
|00000930| 3e 31 31 38 38 20 80 20 | 78 3c 31 32 36 30 20 8c |>1188 . |x<1260 .|
|00000940| 20 4c 25 3d 31 34 0d 04 | 6a 05 cd 0d 04 74 07 3d | L%=14..|j....t.=|
|00000950| 4c 25 0d 04 7e 05 3a 0d | 04 88 11 dd 20 f2 6e 61 |L%..~.:.|.... .na|
|00000960| 76 69 67 61 74 69 6f 6e | 0d 04 92 0d f2 63 6c 65 |vigation|.....cle|
|00000970| 61 72 28 35 29 0d 04 9c | 0f e7 20 44 28 31 30 29 |ar(5)...|.. D(10)|
|00000980| 3c 30 20 8c 0d 04 a6 26 | 20 20 20 20 20 3a 20 f2 |<0 ....&| : .|
|00000990| 66 6f 6e 74 28 31 30 38 | 34 2c 32 32 38 2c 31 2c |font(108|4,228,1,|
|000009a0| 22 4e 41 56 43 4f 4d 50 | 22 29 0d 04 b0 27 20 20 |"NAVCOMP|")...' |
|000009b0| 20 20 20 3a 20 f2 66 6f | 6e 74 28 31 30 38 34 2c | : .fo|nt(1084,|
|000009c0| 31 39 32 2c 31 2c 22 44 | 49 53 41 42 4c 45 44 22 |192,1,"D|ISABLED"|
|000009d0| 29 0d 04 ba 0c 20 20 20 | 20 20 3a 20 e1 0d 04 c4 |).... | : ....|
|000009e0| 05 cd 0d 04 ce 0e e7 20 | 44 28 37 29 3c 30 20 8c |....... |D(7)<0 .|
|000009f0| 0d 04 d8 46 20 20 20 20 | 20 3a 20 f2 70 72 69 6e |...F | : .prin|
|00000a00| 74 65 72 28 32 2c 22 52 | 22 2c 22 57 41 52 50 20 |ter(2,"R|","WARP |
|00000a10| 44 52 49 56 45 20 44 49 | 53 41 42 4c 45 44 20 2e |DRIVE DI|SABLED .|
|00000a20| 2e 2e 20 4d 41 58 20 49 | 4d 50 55 4c 53 45 20 2d |.. MAX I|MPULSE -|
|00000a30| 20 30 2e 32 22 29 0d 04 | e2 05 cd 0d 04 ec 1f f2 | 0.2")..|........|
|00000a40| 66 6f 6e 74 28 31 30 38 | 34 2c 32 32 38 2c 38 2c |font(108|4,228,8,|
|00000a50| 22 48 45 41 44 49 4e 47 | 22 29 0d 04 f6 34 43 31 |"HEADING|")...4C1|
|00000a60| 3d a4 69 6e 70 75 74 28 | 31 30 38 34 2c 31 39 32 |=.input(|1084,192|
|00000a70| 2c 31 31 30 30 2c 31 39 | 32 2c 33 2c 22 3a 22 2c |,1100,19|2,3,":",|
|00000a80| 34 29 20 3a 20 f2 63 6c | 65 61 72 28 35 29 0d 05 |4) : .cl|ear(5)..|
|00000a90| 00 1c f2 66 6f 6e 74 28 | 31 30 38 34 2c 32 32 38 |...font(|1084,228|
|00000aa0| 2c 38 2c 22 57 41 52 50 | 22 29 0d 05 0a 34 57 31 |,8,"WARP|")...4W1|
|00000ab0| 3d a4 69 6e 70 75 74 28 | 31 30 38 34 2c 31 39 32 |=.input(|1084,192|
|00000ac0| 2c 31 31 30 30 2c 31 39 | 32 2c 33 2c 22 3a 22 2c |,1100,19|2,3,":",|
|00000ad0| 34 29 20 3a 20 f2 63 6c | 65 61 72 28 35 29 0d 05 |4) : .cl|ear(5)..|
|00000ae0| 14 1d e7 20 44 28 37 29 | 3c 30 20 80 20 57 31 3e |... D(7)|<0 . W1>|
|00000af0| 2e 32 20 8c 20 e5 20 8d | 74 52 44 0d 05 1e 1b 43 |.2 . . .|tRD....C|
|00000b00| 31 3d 43 31 2b 31 20 3a | 20 e7 20 43 31 3d 39 20 |1=C1+1 :| . C1=9 |
|00000b10| 8c 20 43 31 3d 31 0d 05 | 28 22 e7 20 43 31 3e 39 |. C1=1..|(". C1>9|
|00000b20| 20 84 20 43 31 3c 31 20 | 84 20 57 31 3e 38 20 84 | . C1<1 |. W1>8 .|
|00000b30| 20 57 31 3c 2e 31 20 8c | 0d 05 32 18 20 20 20 20 | W1<.1 .|..2. |
|00000b40| 20 3a 20 f2 63 6c 65 61 | 72 28 35 29 20 3a 20 e1 | : .clea|r(5) : .|
|00000b50| 0d 05 3c 05 cd 0d 05 46 | 14 e7 20 44 25 3d 31 20 |..<....F|.. D%=1 |
|00000b60| 80 20 57 31 3e 2e 39 20 | 8c 0d 05 50 35 20 20 20 |. W1>.9 |...P5 |
|00000b70| 20 20 3a 20 f2 70 72 69 | 6e 74 65 72 28 31 2c 22 | : .pri|nter(1,"|
|00000b80| 42 22 2c 22 44 4f 43 4b | 45 44 20 41 54 20 53 54 |B","DOCK|ED AT ST|
|00000b90| 41 52 42 41 53 45 20 2e | 2e 2e 2e 2e 22 29 0d 05 |ARBASE .|....")..|
|00000ba0| 5a 42 20 20 20 20 20 3a | 20 f2 70 72 69 6e 74 65 |ZB :| .printe|
|00000bb0| 72 28 32 2c 22 59 22 2c | 22 4e 4f 20 57 41 52 50 |r(2,"Y",|"NO WARP|
|00000bc0| 20 41 56 41 49 4c 41 42 | 4c 45 20 57 48 49 4c 53 | AVAILAB|LE WHILS|
|00000bd0| 54 20 44 4f 43 4b 45 44 | 20 2e 2e 2e 2e 2e 22 29 |T DOCKED| .....")|
|00000be0| 0d 05 64 11 20 20 20 20 | 20 3a 20 e5 20 8d 74 52 |..d. | : . .tR|
|00000bf0| 44 0d 05 6e 05 cd 0d 05 | 78 15 4e 3d a8 28 28 57 |D..n....|x.N=.((W|
|00000c00| 31 2b 2e 30 36 32 35 29 | 2a 38 29 0d 05 82 0d e7 |1+.0625)|*8).....|
|00000c10| 20 45 2d 4e 3c 31 20 8c | 0d 05 8c 3f 20 20 20 20 | E-N<1 .|...? |
|00000c20| 20 3a 20 f2 70 72 69 6e | 74 65 72 28 32 2c 22 52 | : .prin|ter(2,"R|
|00000c30| 22 2c 22 49 4e 53 55 46 | 46 49 43 49 45 4e 54 20 |","INSUF|FICIENT |
|00000c40| 45 4e 45 52 47 59 20 46 | 4f 52 20 57 41 52 50 20 |ENERGY F|OR WARP |
|00000c50| 2e 2e 2e 2e 2e 22 29 0d | 05 96 1a 20 20 20 20 20 |.....").|... |
|00000c60| 3a 20 e7 20 45 3c 3d 30 | 20 80 20 53 3c 3d 30 20 |: . E<=0| . S<=0 |
|00000c70| 8c 0d 05 a0 20 20 20 20 | 20 20 3a 20 f2 73 70 61 |.... | : .spa|
|00000c80| 63 65 20 3a 20 f2 64 65 | 61 64 28 31 29 20 3a 20 |ce : .de|ad(1) : |
|00000c90| e1 0d 05 aa 2a cc 20 3a | 20 f2 73 70 61 63 65 20 |....*. :| .space |
|00000ca0| 3a 20 f2 63 6c 65 61 72 | 28 35 29 20 3a 20 f2 63 |: .clear|(5) : .c|
|00000cb0| 6c 65 61 72 28 36 29 20 | 3a 20 e1 0d 05 b4 05 cd |lear(6) |: ......|
|00000cc0| 0d 05 be 05 cd 0d 05 c8 | 24 51 24 28 53 31 2c 53 |........|$Q$(S1,S|
|00000cd0| 32 29 3d 22 22 20 3a 20 | 58 3d 53 31 20 3a 20 59 |2)="" : |X=S1 : Y|
|00000ce0| 3d 53 32 20 3a 20 f2 58 | 59 0d 05 d2 0d e7 20 57 |=S2 : .X|Y..... W|
|00000cf0| 31 3e 3d 31 20 8c 0d 05 | dc 39 20 20 20 20 20 3a |1>=1 ...|.9 :|
|00000d00| 20 f2 70 72 69 6e 74 65 | 72 28 32 2c 22 47 22 2c | .printe|r(2,"G",|
|00000d10| 22 57 41 52 50 20 45 4e | 47 49 4e 45 53 20 41 43 |"WARP EN|GINES AC|
|00000d20| 54 49 56 41 54 45 44 20 | 2e 2e 2e 2e 2e 22 29 0d |TIVATED |.....").|
|00000d30| 05 e6 05 cd 0d 05 f0 10 | f2 75 70 64 61 74 65 42 |........|.updateB|
|00000d40| 61 6e 6b 73 0d 05 fa 0c | 49 25 3d 30 20 3a 20 f5 |anks....|I%=0 : .|
|00000d50| 0d 06 04 17 53 31 3d 53 | 31 2b 58 31 20 3a 20 53 |....S1=S|1+X1 : S|
|00000d60| 32 3d 53 32 2b 58 32 0d | 06 0e 21 e7 20 53 31 3c |2=S2+X2.|..!. S1<|
|00000d70| 31 20 84 20 53 31 3e 38 | 20 84 20 53 32 3c 31 20 |1 . S1>8| . S2<1 |
|00000d80| 84 20 53 32 3e 38 20 8c | 0d 06 18 28 20 20 20 20 |. S2>8 .|...( |
|00000d90| 20 3a 20 58 3d 51 31 2a | 38 2b 58 2b 58 31 2a 4e | : X=Q1*|8+X+X1*N|
|00000da0| 20 3a 20 59 3d 51 32 2a | 38 2b 59 2b 58 32 2a 4e | : Y=Q2*|8+Y+X2*N|
|00000db0| 0d 06 22 20 20 20 20 20 | 20 3a 20 51 31 3d a8 28 |.." | : Q1=.(|
|00000dc0| 58 2f 38 29 20 3a 20 51 | 32 3d a8 28 59 2f 38 29 |X/8) : Q|2=.(Y/8)|
|00000dd0| 0d 06 2c 26 20 20 20 20 | 20 3a 20 53 31 3d a8 28 |..,& | : S1=.(|
|00000de0| 58 2d 51 31 2a 38 29 20 | 3a 20 53 32 3d a8 28 59 |X-Q1*8) |: S2=.(Y|
|00000df0| 2d 51 32 2a 38 29 0d 06 | 36 22 20 20 20 20 20 3a |-Q2*8)..|6" :|
|00000e00| 20 e7 20 53 31 3d 30 20 | 8c 20 51 31 3d 51 31 2d | . S1=0 |. Q1=Q1-|
|00000e10| 31 20 3a 20 53 31 3d 38 | 0d 06 40 22 20 20 20 20 |1 : S1=8|..@" |
|00000e20| 20 3a 20 e7 20 53 32 3d | 30 20 8c 20 51 32 3d 51 | : . S2=|0 . Q2=Q|
|00000e30| 32 2d 31 20 3a 20 53 32 | 3d 38 0d 06 4a 1a 20 20 |2-1 : S2|=8..J. |
|00000e40| 20 20 20 3a 20 54 3d 54 | 2b 31 20 3a 20 45 3d 45 | : T=T|+1 : E=E|
|00000e50| 2d 4e 2b 35 0d 06 54 20 | 20 20 20 20 20 3a 20 e7 |-N+5..T | : .|
|00000e60| 20 54 3e 54 38 20 8c 20 | f2 64 65 61 64 28 32 29 | T>T8 . |.dead(2)|
|00000e70| 20 3a 20 e1 0d 06 5e 1b | 20 20 20 20 20 3a 20 f2 | : ...^.| : .|
|00000e80| 6e 65 77 51 75 61 64 72 | 61 6e 74 20 3a 20 e1 0d |newQuadr|ant : ..|
|00000e90| 06 68 05 cd 0d 06 72 14 | e7 20 51 24 28 53 31 2c |.h....r.|. Q$(S1,|
|00000ea0| 53 32 29 3d 22 22 20 8c | 0d 06 7c 1c 20 20 20 20 |S2)="" .|..|. |
|00000eb0| 20 3a 20 49 25 3d 49 25 | 2b 31 20 3a 20 fd 20 49 | : I%=I%|+1 : . I|
|00000ec0| 25 3e 3d 4e 0d 06 86 2d | cc 20 3a 20 53 31 3d a8 |%>=N...-|. : S1=.|
|00000ed0| 28 53 31 2d 58 31 29 20 | 3a 20 53 32 3d a8 28 53 |(S1-X1) |: S2=.(S|
|00000ee0| 32 2d 58 32 29 20 3a 20 | f2 63 6c 65 61 72 28 33 |2-X2) : |.clear(3|
|00000ef0| 29 0d 06 90 13 20 20 20 | 20 20 3a 20 e7 20 57 31 |).... | : . W1|
|00000f00| 3c 31 20 8c 0d 06 9a 37 | 20 20 20 20 20 3a 20 f2 |<1 ....7| : .|
|00000f10| 74 65 78 74 28 33 30 38 | 2c 36 30 38 2c 22 52 22 |text(308|,608,"R"|
|00000f20| 2c 22 49 4d 50 55 4c 53 | 45 20 44 52 49 56 45 20 |,"IMPULS|E DRIVE |
|00000f30| 53 48 55 54 20 44 4f 57 | 4e 22 29 0d 06 a4 33 cc |SHUT DOW|N")...3.|
|00000f40| 20 3a 20 f2 74 65 78 74 | 28 33 30 38 2c 36 30 38 | : .text|(308,608|
|00000f50| 2c 22 52 22 2c 22 57 41 | 52 50 20 45 4e 47 49 4e |,"R","WA|RP ENGIN|
|00000f60| 45 53 20 53 48 55 54 20 | 44 4f 57 4e 22 29 0d 06 |ES SHUT |DOWN")..|
|00000f70| ae 05 cd 0d 06 b8 48 20 | 20 20 20 20 3a 20 f2 74 |......H | : .t|
|00000f80| 65 78 74 28 33 30 38 2c | 35 35 36 2c 22 52 22 2c |ext(308,|556,"R",|
|00000f90| 22 41 54 20 53 45 43 54 | 4f 52 20 22 2b c3 28 53 |"AT SECT|OR "+.(S|
|00000fa0| 32 29 2b 22 2e 22 2b c3 | 28 53 31 29 2b 22 20 44 |2)+"."+.|(S1)+" D|
|00000fb0| 55 45 20 54 4f 20 42 41 | 44 22 29 0d 06 c2 3b 20 |UE TO BA|D")...; |
|00000fc0| 20 20 20 20 3a 20 f2 74 | 65 78 74 28 33 30 38 2c | : .t|ext(308,|
|00000fd0| 35 30 34 2c 22 52 22 2c | 22 4e 41 56 49 47 41 54 |504,"R",|"NAVIGAT|
|00000fe0| 49 4f 4e 20 2e 2e 2e 2e | 2e 22 29 20 3a 20 57 3d |ION ....|.") : W=|
|00000ff0| a6 28 32 30 30 29 0d 06 | cc 05 cd 0d 06 d6 36 53 |.(200)..|......6S|
|00001000| 31 3d a8 28 53 31 2b 2e | 35 29 20 3a 20 53 32 3d |1=.(S1+.|5) : S2=|
|00001010| a8 28 53 32 2b 2e 35 29 | 20 3a 20 51 24 28 53 31 |.(S2+.5)| : Q$(S1|
|00001020| 2c 53 32 29 3d 22 65 6e | 74 65 72 70 72 69 73 65 |,S2)="en|terprise|
|00001030| 22 0d 06 e0 2e 45 3d 45 | 2d 4e 20 3a 20 54 3d 28 |"....E=E|-N : T=(|
|00001040| a8 28 31 30 2a 54 2b 31 | 2e 31 29 29 2f 31 30 20 |.(10*T+1|.1))/10 |
|00001050| 3a 20 e7 20 57 31 3c 31 | 20 8c 20 8d 64 74 46 0d |: . W1<1| . .dtF.|
|00001060| 06 ea 14 54 3d 28 a8 28 | 31 30 2a 54 2b 39 29 29 |...T=(.(|10*T+9))|
|00001070| 2f 31 30 0d 06 f4 18 e7 | 20 54 3e 54 30 2b 54 39 |/10.....| T>T0+T9|
|00001080| 20 8c 20 f2 64 65 61 64 | 28 32 29 0d 06 fe 20 f2 | . .dead|(2)... .|
|00001090| 62 61 73 65 43 68 65 63 | 6b 20 3a 20 f2 73 68 6f |baseChec|k : .sho|
|000010a0| 72 74 52 61 6e 67 65 53 | 63 61 6e 0d 07 08 19 f2 |rtRangeS|can.....|
|000010b0| 63 6c 65 61 72 28 35 29 | 20 3a 20 f2 63 6c 65 61 |clear(5)| : .clea|
|000010c0| 72 28 36 29 0d 07 12 05 | e1 0d 07 1c 05 3a 0d 07 |r(6)....|.....:..|
|000010d0| 26 12 dd 20 f2 6e 65 77 | 51 75 61 64 72 61 6e 74 |&.. .new|Quadrant|
|000010e0| 0d 07 30 19 f2 63 6c 65 | 61 72 28 31 29 20 3a 20 |..0..cle|ar(1) : |
|000010f0| f2 63 6c 65 61 72 28 36 | 29 0d 07 3a 60 f2 70 72 |.clear(6|)..:`.pr|
|00001100| 69 6e 74 65 72 28 31 2c | 22 57 22 2c 22 4e 4f 57 |inter(1,|"W","NOW|
|00001110| 20 45 4e 54 45 52 49 4e | 47 20 51 55 41 44 52 41 | ENTERIN|G QUADRA|
|00001120| 4e 54 20 22 2b c3 28 51 | 32 29 2b 22 2e 22 2b c3 |NT "+.(Q|2)+"."+.|
|00001130| 28 51 31 29 2b 22 20 53 | 45 43 54 4f 52 20 22 2b |(Q1)+" S|ECTOR "+|
|00001140| c3 28 53 32 29 2b 22 2e | 22 2b c3 28 53 31 29 2b |.(S2)+".|"+.(S1)+|
|00001150| 22 20 2e 2e 2e 2e 2e 22 | 29 0d 07 44 21 e7 20 51 |" ....."|)..D!. Q|
|00001160| 31 3c 31 20 84 20 51 31 | 3e 38 20 84 20 51 32 3c |1<1 . Q1|>8 . Q2<|
|00001170| 31 20 84 20 51 32 3e 38 | 20 8c 0d 07 4e 14 20 20 |1 . Q2>8| ...N. |
|00001180| 20 20 20 3a 20 f2 63 6c | 65 61 72 28 36 29 0d 07 | : .cl|ear(6)..|
|00001190| 58 18 20 20 20 20 20 3a | 20 e7 20 51 31 3e 39 20 |X. :| . Q1>9 |
|000011a0| 8c 20 51 31 3d 39 0d 07 | 62 18 20 20 20 20 20 3a |. Q1=9..|b. :|
|000011b0| 20 e7 20 51 32 3e 39 20 | 8c 20 51 32 3d 39 0d 07 | . Q2>9 |. Q2=9..|
|000011c0| 6c 18 20 20 20 20 20 3a | 20 e7 20 51 31 3c 30 20 |l. :| . Q1<0 |
|000011d0| 8c 20 51 31 3d 30 0d 07 | 76 18 20 20 20 20 20 3a |. Q1=0..|v. :|
|000011e0| 20 e7 20 51 32 3c 30 20 | 8c 20 51 32 3d 30 0d 07 | . Q2<0 |. Q2=0..|
|000011f0| 80 47 20 20 20 20 20 3a | 20 f2 70 72 69 6e 74 65 |.G :| .printe|
|00001200| 72 28 32 2c 22 59 22 2c | 22 59 4f 55 20 48 41 56 |r(2,"Y",|"YOU HAV|
|00001210| 45 20 53 54 52 41 59 45 | 44 20 4f 55 54 53 49 44 |E STRAYE|D OUTSID|
|00001220| 45 20 4f 50 45 52 41 54 | 49 4f 4e 53 20 52 45 47 |E OPERAT|IONS REG|
|00001230| 49 4f 4e 22 29 0d 07 8a | 3b 20 20 20 20 20 3a 20 |ION")...|; : |
|00001240| 57 3d a6 28 38 30 29 20 | 3a 20 f2 70 72 69 6e 74 |W=.(80) |: .print|
|00001250| 65 72 28 32 2c 22 59 22 | 2c 22 4e 4f 20 43 48 41 |er(2,"Y"|,"NO CHA|
|00001260| 52 54 53 20 48 45 4c 44 | 20 2e 2e 2e 2e 2e 22 29 |RTS HELD| .....")|
|00001270| 0d 07 94 05 cd 0d 07 9e | 1b f2 71 75 61 64 42 75 |........|..quadBu|
|00001280| 69 6c 64 20 3a 20 f2 62 | 61 73 65 43 68 65 63 6b |ild : .b|aseCheck|
|00001290| 0d 07 a8 38 f2 73 68 6f | 72 74 52 61 6e 67 65 53 |...8.sho|rtRangeS|
|000012a0| 63 61 6e 20 3a 20 f2 75 | 70 64 61 74 65 50 6f 73 |can : .u|pdatePos|
|000012b0| 20 3a 20 f2 63 6c 65 61 | 72 28 31 29 20 3a 20 f2 | : .clea|r(1) : .|
|000012c0| 63 6c 65 61 72 28 36 29 | 0d 07 b2 1e e7 20 47 28 |clear(6)|..... G(|
|000012d0| 51 31 2c 51 32 29 3d 2d | 31 20 8c 20 f2 73 75 70 |Q1,Q2)=-|1 . .sup|
|000012e0| 65 72 4e 6f 76 61 0d 07 | bc 05 e1 0d 07 c6 05 3a |erNova..|.......:|
|000012f0| 0d 07 d0 11 dd 20 f2 6e | 6f 4b 6c 69 6e 67 6f 6e |..... .n|oKlingon|
|00001300| 73 0d 07 da 25 f2 63 6c | 65 61 72 28 31 29 20 3a |s...%.cl|ear(1) :|
|00001310| 20 f2 63 6c 65 61 72 28 | 34 29 20 3a 20 f2 63 6c | .clear(|4) : .cl|
|00001320| 65 61 72 28 36 29 0d 07 | e4 28 f2 66 6f 6e 74 28 |ear(6)..|.(.font(|
|00001330| 36 32 34 2c 32 32 38 2c | 38 2c 22 53 45 4e 53 4f |624,228,|8,"SENSO|
|00001340| 52 53 20 52 45 50 4f 52 | 54 20 4e 4f 22 29 0d 07 |RS REPOR|T NO")..|
|00001350| ee 27 f2 66 6f 6e 74 28 | 36 32 34 2c 31 39 32 2c |.'.font(|624,192,|
|00001360| 38 2c 22 4b 4c 49 4e 47 | 4f 4e 53 20 49 4e 20 54 |8,"KLING|ONS IN T|
|00001370| 48 49 53 22 29 0d 07 f8 | 25 f2 66 6f 6e 74 28 36 |HIS")...|%.font(6|
|00001380| 32 34 2c 31 35 36 2c 38 | 2c 22 51 55 41 44 52 41 |24,156,8|,"QUADRA|
|00001390| 4e 54 20 2e 2e 2e 2e 2e | 22 29 0d 08 02 05 e1 0d |NT .....|")......|
|000013a0| 08 0c 05 3a 0d 08 16 0e | dd 20 f2 70 68 61 73 6f |...:....|. .phaso|
|000013b0| 72 73 0d 08 20 0c e7 20 | 4b 33 3c 31 20 8c 0d 08 |rs.. .. |K3<1 ...|
|000013c0| 2a 1a 20 20 20 20 20 3a | 20 f2 6e 6f 4b 6c 69 6e |*. :| .noKlin|
|000013d0| 67 6f 6e 73 20 3a 20 e1 | 0d 08 34 05 cd 0d 08 3e |gons : .|..4....>|
|000013e0| 19 f2 63 6c 65 61 72 28 | 34 29 20 3a 20 f2 63 6c |..clear(|4) : .cl|
|000013f0| 65 61 72 28 36 29 0d 08 | 48 0e e7 20 44 28 39 29 |ear(6)..|H.. D(9)|
|00001400| 3c 30 20 8c 0d 08 52 2d | 20 20 20 20 20 3a 20 f2 |<0 ...R-| : .|
|00001410| 66 6f 6e 74 28 36 32 34 | 2c 32 32 38 2c 31 2c 22 |font(624|,228,1,"|
|00001420| 43 4f 4d 42 41 54 20 43 | 4f 4d 50 55 54 45 52 22 |COMBAT C|OMPUTER"|
|00001430| 29 0d 08 5c 2b 20 20 20 | 20 20 3a 20 f2 66 6f 6e |)..\+ | : .fon|
|00001440| 74 28 36 32 34 2c 31 39 | 32 2c 31 2c 22 49 53 20 |t(624,19|2,1,"IS |
|00001450| 44 4f 57 4e 20 2e 2e 2e | 2e 2e 22 29 0d 08 66 0c |DOWN ...|..")..f.|
|00001460| 20 20 20 20 20 3a 20 e1 | 0d 08 70 05 cd 0d 08 7a | : .|..p....z|
|00001470| 0e e7 20 44 28 34 29 3c | 30 20 8c 0d 08 84 2f 20 |.. D(4)<|0 ..../ |
|00001480| 20 20 20 20 3a 20 f2 66 | 6f 6e 74 28 36 32 34 2c | : .f|ont(624,|
|00001490| 32 32 38 2c 31 2c 22 50 | 48 41 53 4f 52 53 20 41 |228,1,"P|HASORS A|
|000014a0| 52 45 20 44 4f 57 4e 21 | 22 29 0d 08 8e 0c 20 20 |RE DOWN!|").... |
|000014b0| 20 20 20 3a 20 e1 0d 08 | 98 05 cd 0d 08 a2 28 f2 | : ...|......(.|
|000014c0| 66 6f 6e 74 28 36 32 34 | 2c 32 32 38 2c 38 2c 22 |font(624|,228,8,"|
|000014d0| 45 4e 45 52 47 59 20 42 | 41 4e 4b 53 20 48 41 56 |ENERGY B|ANKS HAV|
|000014e0| 45 22 29 0d 08 ac 2b f2 | 66 6f 6e 74 28 36 32 34 |E")...+.|font(624|
|000014f0| 2c 31 39 32 2c 38 2c c3 | 28 45 29 2b 22 20 55 4e |,192,8,.|(E)+" UN|
|00001500| 49 54 53 20 55 53 41 42 | 4c 45 20 2d 22 29 0d 08 |ITS USAB|LE -")..|
|00001510| b6 32 58 3d a4 69 6e 70 | 75 74 28 36 32 34 2c 31 |.2X=.inp|ut(624,1|
|00001520| 35 36 2c 39 30 30 2c 31 | 35 36 2c 33 2c 22 55 4e |56,900,1|56,3,"UN|
|00001530| 49 54 53 20 54 4f 20 46 | 49 52 45 3a 22 2c 34 29 |ITS TO F|IRE:",4)|
|00001540| 0d 08 c0 0d e7 20 58 3c | 31 20 8c 20 e1 0d 08 ca |..... X<|1 . ....|
|00001550| 0d e7 20 45 2d 58 3c 30 | 20 8c 0d 08 d4 45 20 20 |.. E-X<0| ....E |
|00001560| 20 20 20 3a 20 f2 70 72 | 69 6e 74 65 72 28 32 2c | : .pr|inter(2,|
|00001570| 22 52 22 2c 22 49 4e 53 | 55 46 46 49 43 45 4e 54 |"R","INS|UFFICENT|
|00001580| 20 45 4e 45 52 47 59 20 | 46 4f 52 20 50 48 41 53 | ENERGY |FOR PHAS|
|00001590| 4f 52 20 53 48 4f 54 20 | 2e 2e 2e 2e 2e 22 29 0d |OR SHOT |.....").|
|000015a0| 08 de 1a 20 20 20 20 20 | 3a 20 f2 73 70 61 63 65 |... |: .space|
|000015b0| 20 3a 20 e5 20 8d 54 7e | 48 0d 08 e8 05 cd 0d 08 | : . .T~|H.......|
|000015c0| f2 24 45 3d 45 2d 58 20 | 3a 20 f2 75 70 64 61 74 |.$E=E-X |: .updat|
|000015d0| 65 42 61 6e 6b 73 20 3a | 20 f2 63 6c 65 61 72 28 |eBanks :| .clear(|
|000015e0| 34 29 0d 08 fc 35 f2 70 | 72 69 6e 74 65 72 28 32 |4)...5.p|rinter(2|
|000015f0| 2c 22 59 22 2c 22 50 48 | 41 53 4f 52 20 53 54 52 |,"Y","PH|ASOR STR|
|00001600| 49 4b 45 20 52 45 50 4f | 52 54 3a 22 29 20 3a 20 |IKE REPO|RT:") : |
|00001610| 57 3d a6 28 34 30 29 0d | 09 06 0e e3 20 49 25 3d |W=.(40).|.... I%=|
|00001620| 31 20 b8 20 33 0d 09 10 | 17 e7 20 4b 28 49 25 2c |1 . 3...|.. K(I%,|
|00001630| 33 29 3c 3d 30 20 8c 20 | 8d 44 74 49 0d 09 1a 2b |3)<=0 . |.DtI...+|
|00001640| 48 3d a8 28 58 2f 4b 33 | 2f 28 a4 44 28 30 29 2f |H=.(X/K3|/(.D(0)/|
|00001650| 32 29 29 20 3a 20 4b 28 | 49 25 2c 33 29 3d 4b 28 |2)) : K(|I%,3)=K(|
|00001660| 49 25 2c 33 29 2d 48 0d | 09 24 52 f2 70 72 69 6e |I%,3)-H.|.$R.prin|
|00001670| 74 65 72 28 32 2c 22 59 | 22 2c c3 28 48 29 2b 22 |ter(2,"Y|",.(H)+"|
|00001680| 20 55 4e 49 54 20 48 49 | 54 20 49 4e 20 53 45 43 | UNIT HI|T IN SEC|
|00001690| 54 4f 52 20 22 2b c3 28 | 4b 28 49 25 2c 32 29 29 |TOR "+.(|K(I%,2))|
|000016a0| 2b 22 2e 22 2b c3 28 4b | 28 49 25 2c 31 29 29 2b |+"."+.(K|(I%,1))+|
|000016b0| 22 20 2e 2e 2e 2e 2e 22 | 29 0d 09 2e 0b 57 3d a6 |" ....."|)....W=.|
|000016c0| 28 34 30 29 0d 09 38 12 | e7 20 4b 28 49 25 2c 33 |(40)..8.|. K(I%,3|
|000016d0| 29 3c 3d 30 20 8c 0d 09 | 42 1d 20 20 20 20 20 3a |)<=0 ...|B. :|
|000016e0| 20 f2 6b 6c 69 6e 67 6f | 6e 57 69 70 65 28 59 2d | .klingo|nWipe(Y-|
|000016f0| 35 32 29 0d 09 4c 21 20 | 20 20 20 20 3a 20 e7 20 |52)..L! | : . |
|00001700| 4b 39 3c 3d 30 20 8c 20 | f2 64 65 61 64 28 34 29 |K9<=0 . |.dead(4)|
|00001710| 20 3a 20 e1 0d 09 56 47 | cc 20 3a 20 f2 70 72 69 | : ...VG|. : .pri|
|00001720| 6e 74 65 72 28 32 2c 22 | 59 22 2c 22 54 41 52 47 |nter(2,"|Y","TARG|
|00001730| 45 54 20 48 41 53 20 22 | 2b c3 28 4b 28 49 25 2c |ET HAS "|+.(K(I%,|
|00001740| 33 29 29 2b 22 20 55 4e | 49 54 53 20 52 45 4d 41 |3))+" UN|ITS REMA|
|00001750| 49 4e 49 4e 47 20 2e 2e | 2e 22 29 0d 09 60 05 cd |INING ..|.")..`..|
|00001760| 0d 09 6a 0b 57 3d a6 28 | 34 30 29 0d 09 74 05 ed |..j.W=.(|40)..t..|
|00001770| 0d 09 7e 2b f2 73 68 6f | 72 74 52 61 6e 67 65 53 |..~+.sho|rtRangeS|
|00001780| 63 61 6e 20 3a 20 f2 63 | 6c 65 61 72 28 31 29 20 |can : .c|lear(1) |
|00001790| 3a 20 f2 63 6c 65 61 72 | 28 36 29 0d 09 88 1a e7 |: .clear|(6).....|
|000017a0| 20 45 3c 31 20 80 20 53 | 3c 31 20 8c 20 f2 64 65 | E<1 . S|<1 . .de|
|000017b0| 61 64 28 31 29 0d 09 92 | 05 e1 0d 09 9c 05 3a 0d |ad(1)...|......:.|
|000017c0| 09 a6 10 dd 20 f2 74 6f | 72 70 65 64 6f 65 73 0d |.... .to|rpedoes.|
|000017d0| 09 b0 0c e7 20 4b 33 3c | 31 20 8c 0d 09 ba 1a 20 |.... K3<|1 ..... |
|000017e0| 20 20 20 20 3a 20 f2 6e | 6f 4b 6c 69 6e 67 6f 6e | : .n|oKlingon|
|000017f0| 73 20 3a 20 e1 0d 09 c4 | 05 cd 0d 09 ce 0d f2 63 |s : ....|.......c|
|00001800| 6c 65 61 72 28 34 29 0d | 09 d8 0e e7 20 44 28 39 |lear(4).|.... D(9|
|00001810| 29 3c 30 20 8c 0d 09 e2 | 2d 20 20 20 20 20 3a 20 |)<0 ....|- : |
|00001820| f2 66 6f 6e 74 28 36 32 | 34 2c 32 32 38 2c 31 2c |.font(62|4,228,1,|
|00001830| 22 43 4f 4d 42 41 54 20 | 43 4f 4d 50 55 54 45 52 |"COMBAT |COMPUTER|
|00001840| 22 29 0d 09 ec 2b 20 20 | 20 20 20 3a 20 f2 66 6f |")...+ | : .fo|
|00001850| 6e 74 28 36 32 34 2c 31 | 39 32 2c 31 2c 22 49 53 |nt(624,1|92,1,"IS|
|00001860| 20 44 4f 57 4e 20 2e 2e | 2e 2e 2e 22 29 0d 09 f6 | DOWN ..|...")...|
|00001870| 0c 20 20 20 20 20 3a 20 | e1 0d 0a 00 05 cd 0d 0a |. : |........|
|00001880| 0a 0b e7 20 50 3d 30 20 | 8c 0d 0a 14 2b 20 20 20 |... P=0 |....+ |
|00001890| 20 20 3a 20 f2 66 6f 6e | 74 28 36 32 34 2c 32 32 | : .fon|t(624,22|
|000018a0| 38 2c 31 2c 22 41 4c 4c | 20 54 4f 52 50 45 44 4f |8,1,"ALL| TORPEDO|
|000018b0| 45 53 22 29 0d 0a 1e 2c | 20 20 20 20 20 3a 20 f2 |ES")...,| : .|
|000018c0| 66 6f 6e 74 28 36 32 34 | 2c 31 39 32 2c 31 2c 22 |font(624|,192,1,"|
|000018d0| 45 58 50 45 4e 44 45 44 | 20 2e 2e 2e 2e 2e 22 29 |EXPENDED| .....")|
|000018e0| 0d 0a 28 0c 20 20 20 20 | 20 3a 20 e1 0d 0a 32 05 |..(. | : ...2.|
|000018f0| cd 0d 0a 3c 0e e7 20 44 | 28 35 29 3c 30 20 8c 0d |...<.. D|(5)<0 ..|
|00001900| 0a 46 2e 20 20 20 20 20 | 3a 20 f2 66 6f 6e 74 28 |.F. |: .font(|
|00001910| 36 32 34 2c 32 32 38 2c | 31 2c 22 50 48 4f 54 4f |624,228,|1,"PHOTO|
|00001920| 4e 20 54 55 42 45 53 20 | 41 52 45 22 29 0d 0a 50 |N TUBES |ARE")..P|
|00001930| 2b 20 20 20 20 20 3a 20 | f2 66 6f 6e 74 28 36 32 |+ : |.font(62|
|00001940| 34 2c 31 39 32 2c 31 2c | 22 44 41 4d 41 47 45 44 |4,192,1,|"DAMAGED|
|00001950| 20 2e 2e 2e 2e 2e 22 29 | 0d 0a 5a 0c 20 20 20 20 | .....")|..Z. |
|00001960| 20 3a 20 e1 0d 0a 64 05 | cd 0d 0a 6e 29 f2 66 6f | : ...d.|...n).fo|
|00001970| 6e 74 28 36 32 34 2c 32 | 32 38 2c 33 2c 22 46 49 |nt(624,2|28,3,"FI|
|00001980| 52 45 20 42 45 41 52 49 | 4e 47 20 28 30 2d 37 29 |RE BEARI|NG (0-7)|
|00001990| 22 29 0d 0a 78 26 43 31 | 3d a4 69 6e 70 75 74 28 |")..x&C1|=.input(|
|000019a0| 36 32 34 2c 31 39 32 2c | 36 34 38 2c 31 39 32 2c |624,192,|648,192,|
|000019b0| 33 2c 22 3a 22 2c 34 29 | 0d 0a 82 18 43 31 3d 43 |3,":",4)|....C1=C|
|000019c0| 31 2b 31 20 3a 20 e7 20 | 43 31 3e 39 20 8c 20 e1 |1+1 : . |C1>9 . .|
|000019d0| 0d 0a 8c 12 f2 66 69 72 | 65 54 6f 72 70 65 64 6f |.....fir|eTorpedo|
|000019e0| 65 73 0d 0a 96 05 e1 0d | 0a a0 05 3a 0d 0a aa 14 |es......|...:....|
|000019f0| dd 20 f2 66 69 72 65 54 | 6f 72 70 65 64 6f 65 73 |. .fireT|orpedoes|
|00001a00| 0d 0a b4 0e 46 25 3d 30 | 20 3a 20 f2 58 59 0d 0a |....F%=0| : .XY..|
|00001a10| be 3a 58 3d 53 31 20 3a | 20 59 3d 53 32 20 3a 20 |.:X=S1 :| Y=S2 : |
|00001a20| 50 3d 50 2d 31 20 3a 20 | f2 66 6f 6e 74 28 36 32 |P=P-1 : |.font(62|
|00001a30| 34 2c 31 35 36 2c 38 2c | 22 54 4f 52 50 45 44 4f |4,156,8,|"TORPEDO|
|00001a40| 20 54 52 41 43 4b 22 29 | 0d 0a c8 1d 58 3d 58 2b | TRACK")|....X=X+|
|00001a50| 58 31 20 3a 20 59 3d 59 | 2b 58 32 20 3a 20 57 3d |X1 : Y=Y|+X2 : W=|
|00001a60| a6 28 32 35 29 0d 0a d2 | 1d e7 20 58 3c 31 20 84 |.(25)...|.. X<1 .|
|00001a70| 20 58 3e 38 20 84 20 59 | 3c 31 20 84 20 59 3e 38 | X>8 . Y|<1 . Y>8|
|00001a80| 20 8c 0d 0a dc 3d 20 20 | 20 20 20 3a 20 f2 63 6c | ....= | : .cl|
|00001a90| 65 61 72 28 34 29 20 3a | 20 f2 70 72 69 6e 74 65 |ear(4) :| .printe|
|00001aa0| 72 28 32 2c 22 59 22 2c | 22 54 4f 52 50 45 44 4f |r(2,"Y",|"TORPEDO|
|00001ab0| 20 4d 49 53 53 45 44 20 | 2e 2e 2e 2e 2e 22 29 0d | MISSED |.....").|
|00001ac0| 0a e6 0c 20 20 20 20 20 | 3a 20 e1 0d 0a f0 05 cd |... |: ......|
|00001ad0| 0d 0a fa 21 78 24 3d c3 | 28 a8 28 58 2b 2e 35 29 |...!x$=.|(.(X+.5)|
|00001ae0| 29 20 3a 20 79 24 3d c3 | 28 a8 28 59 2b 2e 35 29 |) : y$=.|(.(Y+.5)|
|00001af0| 29 0d 0b 04 1d e6 20 30 | 20 3a 20 c8 93 20 c8 90 |)..... 0| : .. ..|
|00001b00| 20 39 32 30 2c 31 32 34 | 2c 36 34 2c 33 32 0d 0b | 920,124|,64,32..|
|00001b10| 0e 1e f2 66 6f 6e 74 28 | 39 32 30 2c 31 35 36 2c |...font(|920,156,|
|00001b20| 33 2c 79 24 2b 22 2e 22 | 2b 78 24 29 0d 0b 18 1f |3,y$+"."|+x$)....|
|00001b30| e7 20 a8 28 58 2b 2e 32 | 35 29 3c 3e a8 28 58 2b |. .(X+.2|5)<>.(X+|
|00001b40| 2e 37 35 29 20 8c 20 8d | 64 48 4a 0d 0b 22 1f e7 |.75) . .|dHJ.."..|
|00001b50| 20 a8 28 59 2b 2e 32 35 | 29 3c 3e a8 28 59 2b 2e | .(Y+.25|)<>.(Y+.|
|00001b60| 37 35 29 20 8c 20 8d 64 | 48 4a 0d 0b 2c 1b 5a 31 |75) . .d|HJ..,.Z1|
|00001b70| 3d a8 28 58 2b 2e 35 29 | 20 3a 20 5a 32 3d a8 28 |=.(X+.5)| : Z2=.(|
|00001b80| 59 2b 2e 35 29 0d 0b 36 | 23 41 24 3d 22 22 20 3a |Y+.5)..6|#A$="" :|
|00001b90| 20 f2 63 68 65 63 6b 20 | 3a 20 e7 20 5a 33 3c 3e | .check |: . Z3<>|
|00001ba0| 30 20 8c 20 8d 64 48 4a | 0d 0b 40 25 41 24 3d 22 |0 . .dHJ|..@%A$="|
|00001bb0| 6b 6c 69 6e 67 6f 6e 22 | 20 3a 20 f2 63 68 65 63 |klingon"| : .chec|
|00001bc0| 6b 20 3a 20 e7 20 5a 33 | 3c 3e 30 20 8c 0d 0b 4a |k : . Z3|<>0 ...J|
|00001bd0| 47 20 20 20 20 20 3a 20 | f2 63 6c 65 61 72 28 34 |G : |.clear(4|
|00001be0| 29 20 3a 20 f2 70 72 69 | 6e 74 65 72 28 32 2c 22 |) : .pri|nter(2,"|
|00001bf0| 52 22 2c 22 54 41 52 47 | 45 54 20 4b 4c 49 4e 47 |R","TARG|ET KLING|
|00001c00| 4f 4e 20 44 45 53 54 52 | 4f 59 45 44 20 2e 2e 2e |ON DESTR|OYED ...|
|00001c10| 2e 2e 22 29 0d 0b 54 1c | 20 20 20 20 20 3a 20 4b |..")..T.| : K|
|00001c20| 33 3d 4b 33 2d 31 20 3a | 20 4b 39 3d 4b 39 2d 31 |3=K3-1 :| K9=K9-1|
|00001c30| 0d 0b 5e 21 20 20 20 20 | 20 3a 20 e7 20 4b 39 3c |..^! | : . K9<|
|00001c40| 3d 30 20 8c 20 f2 64 65 | 61 64 28 34 29 20 3a 20 |=0 . .de|ad(4) : |
|00001c50| e1 0d 0b 68 15 20 20 20 | 20 20 3a 20 e3 20 49 25 |...h. | : . I%|
|00001c60| 3d 31 20 b8 20 33 0d 0b | 72 1f 20 20 20 20 20 3a |=1 . 3..|r. :|
|00001c70| 20 e7 20 5a 31 3c 3e 4b | 28 49 25 2c 31 29 20 8c | . Z1<>K|(I%,1) .|
|00001c80| 20 8d 74 50 4b 0d 0b 7c | 32 20 20 20 20 20 3a 20 | .tPK..||2 : |
|00001c90| e7 20 5a 32 3d 4b 28 49 | 25 2c 32 29 20 8c 20 4b |. Z2=K(I|%,2) . K|
|00001ca0| 28 49 25 2c 33 29 3d 30 | 20 3a 20 51 24 28 5a 31 |(I%,3)=0| : Q$(Z1|
|00001cb0| 2c 5a 32 29 3d 22 22 0d | 0b 86 37 20 20 20 20 20 |,Z2)="".|..7 |
|00001cc0| 3a 20 47 28 51 31 2c 51 | 32 29 3d 4b 33 2a 31 30 |: G(Q1,Q|2)=K3*10|
|00001cd0| 30 2b 42 33 2a 31 30 2b | 53 33 20 3a 20 5a 28 51 |0+B3*10+|S3 : Z(Q|
|00001ce0| 31 2c 51 32 29 3d 47 28 | 51 31 2c 51 32 29 0d 0b |1,Q2)=G(|Q1,Q2)..|
|00001cf0| 90 22 20 20 20 20 20 3a | 20 ed 20 3a 20 f2 73 68 |." :| . : .sh|
|00001d00| 6f 72 74 52 61 6e 67 65 | 53 63 61 6e 20 3a 20 e1 |ortRange|Scan : .|
|00001d10| 0d 0b 9a 1a cc 20 3a 20 | 41 24 3d 22 73 74 61 72 |..... : |A$="star|
|00001d20| 22 20 3a 20 f2 63 68 65 | 63 6b 0d 0b a4 05 cd 0d |" : .che|ck......|
|00001d30| 0b ae 0d e7 20 5a 33 3c | 3e 30 20 8c 0d 0b b8 44 |.... Z3<|>0 ....D|
|00001d40| 20 20 20 20 20 3a 20 f2 | 63 6c 65 61 72 28 34 29 | : .|clear(4)|
|00001d50| 20 3a 20 f2 70 72 69 6e | 74 65 72 28 32 2c 22 59 | : .prin|ter(2,"Y|
|00001d60| 22 2c 22 53 54 41 52 20 | 41 42 53 4f 52 42 45 44 |","STAR |ABSORBED|
|00001d70| 20 54 4f 52 50 45 44 4f | 20 2e 2e 2e 2e 2e 22 29 | TORPEDO| .....")|
|00001d80| 0d 0b c2 1f 20 20 20 20 | 20 3a 20 e7 20 b3 28 31 |.... | : . .(1|
|00001d90| 29 3e 2e 38 20 8c 20 f2 | 64 65 61 64 28 35 29 0d |)>.8 . .|dead(5).|
|00001da0| 0b cc 0c 20 20 20 20 20 | 3a 20 e1 0d 0b d6 1e cc |... |: ......|
|00001db0| 20 3a 20 41 24 3d 22 73 | 74 61 72 62 61 73 65 22 | : A$="s|tarbase"|
|00001dc0| 20 3a 20 f2 63 68 65 63 | 6b 0d 0b e0 05 cd 0d 0b | : .chec|k.......|
|00001dd0| ea 13 e7 20 5a 33 3d 30 | 20 8c 20 e5 20 8d 64 48 |... Z3=0| . . .dH|
|00001de0| 4a 0d 0b f4 05 cd 0d 0b | fe 44 f2 63 6c 65 61 72 |J.......|.D.clear|
|00001df0| 28 34 29 20 3a 20 f2 70 | 72 69 6e 74 65 72 28 32 |(4) : .p|rinter(2|
|00001e00| 2c 22 42 22 2c 22 53 54 | 41 52 42 41 53 45 20 44 |,"B","ST|ARBASE D|
|00001e10| 45 53 54 52 4f 59 45 44 | 20 2e 2e 2e 2e 2e 22 29 |ESTROYED| .....")|
|00001e20| 20 3a 20 57 3d a6 28 38 | 30 29 0d 0c 08 42 f2 70 | : W=.(8|0)...B.p|
|00001e30| 72 69 6e 74 65 72 28 32 | 2c 22 59 22 2c 22 59 4f |rinter(2|,"Y","YO|
|00001e40| 55 20 57 49 4c 4c 20 41 | 50 50 45 41 52 20 42 45 |U WILL A|PPEAR BE|
|00001e50| 46 4f 52 20 41 20 43 4f | 55 52 54 20 4d 41 52 53 |FOR A CO|URT MARS|
|00001e60| 48 41 4c 4c 20 2e 2e 2e | 2e 2e 22 29 0d 0c 12 40 |HALL ...|..")...@|
|00001e70| 57 3d a6 28 34 30 29 20 | 3a 20 f2 70 72 69 6e 74 |W=.(40) |: .print|
|00001e80| 65 72 28 32 2c 22 59 22 | 2c 22 49 46 20 59 4f 55 |er(2,"Y"|,"IF YOU|
|00001e90| 20 53 55 52 56 49 56 45 | 20 54 48 45 20 4d 49 53 | SURVIVE| THE MIS|
|00001ea0| 53 49 4f 4e 20 2e 2e 2e | 2e 2e 22 29 0d 0c 1c 24 |SION ...|..")...$|
|00001eb0| 42 33 3d 42 33 2d 31 20 | 3a 20 42 39 3d 42 39 2d |B3=B3-1 |: B9=B9-|
|00001ec0| 31 20 3a 20 51 24 28 5a | 31 2c 5a 32 29 3d 22 22 |1 : Q$(Z|1,Z2)=""|
|00001ed0| 0d 0c 26 30 47 28 51 31 | 2c 51 32 29 3d 4b 33 2a |..&0G(Q1|,Q2)=K3*|
|00001ee0| 31 30 30 2b 42 33 2a 31 | 30 2b 53 33 20 3a 20 5a |100+B3*1|0+S3 : Z|
|00001ef0| 28 51 31 2c 51 32 29 3d | 47 28 51 31 2c 51 32 29 |(Q1,Q2)=|G(Q1,Q2)|
|00001f00| 0d 0c 30 14 e7 20 45 3c | 31 20 8c 20 f2 64 65 61 |..0.. E<|1 . .dea|
|00001f10| 64 28 31 29 0d 0c 3a 05 | e1 0d 0c 44 05 3a 0d 0c |d(1)..:.|...D.:..|
|00001f20| 4e 10 dd 20 f2 64 65 66 | 6c 65 63 74 6f 72 0d 0c |N.. .def|lector..|
|00001f30| 58 0d f2 63 6c 65 61 72 | 28 34 29 0d 0c 62 0e e7 |X..clear|(4)..b..|
|00001f40| 20 44 28 36 29 3c 30 20 | 8c 0d 0c 6c 2c 20 20 20 | D(6)<0 |...l, |
|00001f50| 20 20 3a 20 f2 66 6f 6e | 74 28 36 32 34 2c 32 32 | : .fon|t(624,22|
|00001f60| 38 2c 31 2c 22 44 45 46 | 4c 45 43 54 4f 52 53 20 |8,1,"DEF|LECTORS |
|00001f70| 41 52 45 22 29 0d 0c 76 | 2e 20 20 20 20 20 3a 20 |ARE")..v|. : |
|00001f80| f2 66 6f 6e 74 28 36 32 | 34 2c 31 39 32 2c 31 2c |.font(62|4,192,1,|
|00001f90| 22 4f 55 54 20 4f 46 20 | 41 43 54 49 4f 4e 20 2e |"OUT OF |ACTION .|
|00001fa0| 2e 22 29 0d 0c 80 0c 20 | 20 20 20 20 3a 20 e1 0d |.").... | : ..|
|00001fb0| 0c 8a 05 cd 0d 0c 94 29 | f2 66 6f 6e 74 28 36 32 |.......)|.font(62|
|00001fc0| 34 2c 32 32 38 2c 38 2c | 22 45 4e 45 52 47 59 20 |4,228,8,|"ENERGY |
|00001fd0| 42 41 4e 4b 53 20 22 2b | c3 28 45 29 29 0d 0c 9e |BANKS "+|.(E))...|
|00001fe0| 29 f2 66 6f 6e 74 28 36 | 32 34 2c 31 39 32 2c 35 |).font(6|24,192,5|
|00001ff0| 2c 22 44 45 46 4c 45 43 | 54 4f 52 20 41 54 20 22 |,"DEFLEC|TOR AT "|
|00002000| 2b c3 28 53 29 29 0d 0c | a8 2b 58 3d a4 69 6e 70 |+.(S))..|.+X=.inp|
|00002010| 75 74 28 36 32 34 2c 31 | 35 36 2c 38 30 30 2c 31 |ut(624,1|56,800,1|
|00002020| 35 36 2c 33 2c 22 53 45 | 54 20 54 4f 3a 22 2c 34 |56,3,"SE|T TO:",4|
|00002030| 29 0d 0c b2 0d e7 20 58 | 3e 45 2b 53 20 8c 0d 0c |)..... X|>E+S ...|
|00002040| bc 0d f2 63 6c 65 61 72 | 28 34 29 0d 0c c6 41 20 |...clear|(4)...A |
|00002050| 20 20 20 20 3a 20 f2 70 | 72 69 6e 74 65 72 28 32 | : .p|rinter(2|
|00002060| 2c 22 59 22 2c 22 49 4e | 53 55 46 46 49 43 45 4e |,"Y","IN|SUFFICEN|
|00002070| 54 20 45 4e 45 52 47 59 | 20 46 4f 52 20 53 45 54 |T ENERGY| FOR SET|
|00002080| 54 49 4e 47 20 2e 2e 2e | 2e 2e 22 29 0d 0c d0 1b |TING ...|..")....|
|00002090| 20 20 20 20 20 3a 20 57 | 3d a6 28 38 30 29 20 3a | : W|=.(80) :|
|000020a0| 20 e5 20 8d 44 58 4c 0d | 0c da 05 cd 0d 0c e4 17 | . .DXL.|........|
|000020b0| 57 3d a6 28 31 35 29 20 | 3a 20 f2 63 6c 65 61 72 |W=.(15) |: .clear|
|000020c0| 28 34 29 0d 0c ee 12 e7 | 20 58 3c 3d 31 20 84 20 |(4).....| X<=1 . |
|000020d0| 58 3d 53 20 8c 0d 0c f8 | 2e 20 20 20 20 20 3a 20 |X=S ....|. : |
|000020e0| f2 66 6f 6e 74 28 36 32 | 34 2c 32 32 38 2c 38 2c |.font(62|4,228,8,|
|000020f0| 22 44 45 46 4c 45 43 54 | 4f 52 53 20 53 54 49 4c |"DEFLECT|ORS STIL|
|00002100| 4c 22 29 0d 0d 02 30 20 | 20 20 20 20 3a 20 f2 66 |L")...0 | : .f|
|00002110| 6f 6e 74 28 36 32 34 2c | 31 39 32 2c 38 2c 22 55 |ont(624,|192,8,"U|
|00002120| 4e 43 48 41 4e 47 45 44 | 20 41 54 20 22 2b c3 28 |NCHANGED| AT "+.(|
|00002130| 53 29 29 0d 0d 0c 24 cc | 20 3a 20 45 3d 45 2b 53 |S))...$.| : E=E+S|
|00002140| 2d 58 20 3a 20 53 3d 58 | 20 3a 20 f2 75 70 64 61 |-X : S=X| : .upda|
|00002150| 74 65 42 61 6e 6b 73 0d | 0d 16 2f 20 20 20 20 20 |teBanks.|../ |
|00002160| 3a 20 f2 66 6f 6e 74 28 | 36 32 34 2c 32 32 38 2c |: .font(|624,228,|
|00002170| 38 2c 22 44 45 46 4c 45 | 43 54 4f 52 53 20 53 54 |8,"DEFLE|CTORS ST|
|00002180| 41 42 4c 45 22 29 0d 0d | 20 30 20 20 20 20 20 3a |ABLE")..| 0 :|
|00002190| 20 f2 66 6f 6e 74 28 36 | 32 34 2c 31 39 32 2c 38 | .font(6|24,192,8|
|000021a0| 2c 22 41 54 20 22 2b c3 | 28 53 29 2b 22 20 55 4e |,"AT "+.|(S)+" UN|
|000021b0| 49 54 53 2e 22 29 0d 0d | 2a 05 cd 0d 0d 34 19 f2 |ITS.")..|*....4..|
|000021c0| 63 6c 65 61 72 28 31 29 | 20 3a 20 f2 63 6c 65 61 |clear(1)| : .clea|
|000021d0| 72 28 36 29 0d 0d 3e 05 | e1 0d 0d 48 05 3a 0d 0d |r(6)..>.|...H.:..|
|000021e0| 52 13 dd 20 f2 64 61 6d | 61 67 65 52 65 70 6f 72 |R.. .dam|ageRepor|
|000021f0| 74 0d 0d 5c 1c ea 20 41 | 2c 42 2c 43 2c 59 2c 41 |t..\.. A|,B,C,Y,A|
|00002200| 24 20 3a 20 f2 63 6c 65 | 61 72 28 32 29 0d 0d 66 |$ : .cle|ar(2)..f|
|00002210| 0e e7 20 44 28 38 29 3c | 30 20 8c 0d 0d 70 24 20 |.. D(8)<|0 ...p$ |
|00002220| 20 20 20 20 3a 20 f2 66 | 6f 6e 74 28 33 32 2c 37 | : .f|ont(32,7|
|00002230| 34 38 2c 31 2c 22 53 59 | 53 54 45 4d 53 22 29 0d |48,1,"SY|STEMS").|
|00002240| 0d 7a 23 20 20 20 20 20 | 3a 20 f2 66 6f 6e 74 28 |.z# |: .font(|
|00002250| 33 32 2c 37 30 38 2c 31 | 2c 22 53 54 41 54 55 53 |32,708,1|,"STATUS|
|00002260| 22 29 0d 0d 84 24 20 20 | 20 20 20 3a 20 f2 66 6f |")...$ | : .fo|
|00002270| 6e 74 28 33 32 2c 36 36 | 38 2c 31 2c 22 49 53 20 |nt(32,66|8,1,"IS |
|00002280| 44 4f 57 4e 22 29 0d 0d | 8e 0c 20 20 20 20 20 3a |DOWN")..|.. :|
|00002290| 20 e1 0d 0d 98 05 cd 0d | 0d a2 12 59 3d 37 34 38 | .......|...Y=748|
|000022a0| 20 3a 20 f7 20 8d 54 46 | 4e 0d 0d ac 0e e3 20 41 | : . .TF|N..... A|
|000022b0| 3d 31 20 b8 20 31 32 0d | 0d b6 23 e7 20 41 3d 34 |=1 . 12.|..#. A=4|
|000022c0| 20 84 20 41 3d 37 20 84 | 20 41 3d 39 20 84 20 41 | . A=7 .| A=9 . A|
|000022d0| 3d 31 31 20 8c 20 59 2d | 3d 34 0d 0d c0 1d f3 20 |=11 . Y-|=4..... |
|000022e0| 42 2c 41 24 20 3a 20 f2 | 66 6f 6e 74 28 33 32 2c |B,A$ : .|font(32,|
|000022f0| 59 2c 42 2c 41 24 29 0d | 0d ca 1b 43 3d 44 28 41 |Y,B,A$).|...C=D(A|
|00002300| 29 2b 34 20 3a 20 e7 20 | 43 3c 31 20 8c 20 8d 64 |)+4 : . |C<1 . .d|
|00002310| 7c 4d 0d 0d d4 0b e7 20 | 43 3c 34 20 8c 0d 0d de ||M..... |C<4 ....|
|00002320| 20 20 20 20 20 20 3a 20 | f2 66 6f 6e 74 28 36 34 | : |.font(64|
|00002330| 2c 59 2c 31 2c c4 43 2c | 22 5f 22 29 29 0d 0d e8 |,Y,1,.C,|"_"))...|
|00002340| 1d cc 20 3a 20 f2 66 6f | 6e 74 28 36 34 2c 59 2c |.. : .fo|nt(64,Y,|
|00002350| 42 2c c4 43 2c 22 5f 22 | 29 29 0d 0d f2 05 cd 0d |B,.C,"_"|))......|
|00002360| 0d fc 0d 59 2d 3d 34 30 | 20 3a 20 ed 0d 0e 06 29 |...Y-=40| : ....)|
|00002370| dc 20 38 2c 22 53 22 2c | 38 2c 22 4c 22 2c 38 2c |. 8,"S",|8,"L",8,|
|00002380| 22 48 22 2c 32 2c 22 50 | 22 2c 32 2c 22 54 22 2c |"H",2,"P|",2,"T",|
|00002390| 32 2c 22 44 22 0d 0e 10 | 29 dc 20 33 2c 22 57 22 |2,"D"...|). 3,"W"|
|000023a0| 2c 33 2c 22 44 22 2c 35 | 2c 22 43 22 2c 35 2c 22 |,3,"D",5|,"C",5,"|
|000023b0| 4e 22 2c 36 2c 22 43 22 | 2c 36 2c 22 4c 22 0d 0e |N",6,"C"|,6,"L"..|
|000023c0| 1a 05 e1 0d 0e 24 05 3a | 0d 0e 2e 15 dd 20 f2 6b |.....$.:|..... .k|
|000023d0| 6c 69 6e 67 6f 6e 57 69 | 70 65 28 59 29 0d 0e 38 |lingonWi|pe(Y)..8|
|000023e0| 34 f2 70 72 69 6e 74 65 | 72 28 32 2c 22 52 22 2c |4.printe|r(2,"R",|
|000023f0| 22 54 41 52 47 45 54 20 | 4b 4c 49 4e 47 4f 4e 20 |"TARGET |KLINGON |
|00002400| 44 45 53 54 52 4f 59 45 | 44 20 2e 2e 2e 2e 2e 22 |DESTROYE|D ....."|
|00002410| 29 0d 0e 42 3e 4b 33 3d | 4b 33 2d 31 20 3a 20 4b |)..B>K3=|K3-1 : K|
|00002420| 39 3d 4b 39 2d 31 20 3a | 20 5a 31 3d 4b 28 49 25 |9=K9-1 :| Z1=K(I%|
|00002430| 2c 31 29 20 3a 20 5a 32 | 3d 4b 28 49 25 2c 32 29 |,1) : Z2|=K(I%,2)|
|00002440| 20 3a 20 51 24 28 5a 31 | 2c 5a 32 29 3d 22 22 0d | : Q$(Z1|,Z2)="".|
|00002450| 0e 4c 30 47 28 51 31 2c | 51 32 29 3d 4b 33 2a 31 |.L0G(Q1,|Q2)=K3*1|
|00002460| 30 30 2b 42 33 2a 31 30 | 2b 53 33 20 3a 20 5a 28 |00+B3*10|+S3 : Z(|
|00002470| 51 31 2c 51 32 29 3d 47 | 28 51 31 2c 51 32 29 0d |Q1,Q2)=G|(Q1,Q2).|
|00002480| 0e 56 05 e1 0d 0e 60 05 | 3a 0d 0e 6a 0d dd 20 f2 |.V....`.|:..j.. .|
|00002490| 61 74 74 61 63 6b 0d 0e | 74 0e e7 20 4b 33 3d 30 |attack..|t.. K3=0|
|000024a0| 20 8c 20 e1 0d 0e 7e 22 | 6b 24 3d 22 53 20 41 52 | . ...~"|k$="S AR|
|000024b0| 45 22 20 3a 20 e7 20 4b | 33 3d 31 20 8c 20 6b 24 |E" : . K|3=1 . k$|
|000024c0| 3d 22 20 49 53 22 0d 0e | 88 0c e7 20 44 25 3d 31 |=" IS"..|... D%=1|
|000024d0| 20 8c 0d 0e 92 41 20 20 | 20 20 20 3a 20 f2 70 72 | ....A | : .pr|
|000024e0| 69 6e 74 65 72 28 31 2c | 22 52 22 2c c3 28 4b 33 |inter(1,|"R",.(K3|
|000024f0| 29 2b 22 20 4b 4c 49 4e | 47 4f 4e 22 2b 6b 24 2b |)+" KLIN|GON"+k$+|
|00002500| 22 20 41 54 54 41 43 4b | 49 4e 47 20 2e 2e 2e 2e |" ATTACK|ING ....|
|00002510| 2e 22 29 0d 0e 9c 47 20 | 20 20 20 20 3a 20 f2 70 |.")...G | : .p|
|00002520| 72 69 6e 74 65 72 28 32 | 2c 22 59 22 2c 22 53 54 |rinter(2|,"Y","ST|
|00002530| 41 52 42 41 53 45 20 53 | 48 49 45 4c 44 53 20 50 |ARBASE S|HIELDS P|
|00002540| 52 4f 54 45 43 54 20 59 | 4f 55 52 20 56 45 53 53 |ROTECT Y|OUR VESS|
|00002550| 45 4c 20 2e 2e 2e 2e 2e | 22 29 0d 0e a6 15 20 20 |EL .....|").... |
|00002560| 20 20 20 3a 20 f2 73 70 | 61 63 65 20 3a 20 e1 0d | : .sp|ace : ..|
|00002570| 0e b0 05 cd 0d 0e ba 3a | f2 70 72 69 6e 74 65 72 |.......:|.printer|
|00002580| 28 31 2c 22 52 22 2c c3 | 28 4b 33 29 2b 22 20 4b |(1,"R",.|(K3)+" K|
|00002590| 4c 49 4e 47 4f 4e 22 2b | 6b 24 2b 22 20 41 54 54 |LINGON"+|k$+" ATT|
|000025a0| 41 43 4b 49 4e 47 20 2e | 2e 2e 2e 2e 22 29 0d 0e |ACKING .|....")..|
|000025b0| c4 26 e3 20 49 25 3d 31 | 20 b8 20 33 20 3a 20 e7 |.&. I%=1| . 3 : .|
|000025c0| 20 4b 28 49 25 2c 33 29 | 3c 3d 30 20 8c 20 e5 20 | K(I%,3)|<=0 . . |
|000025d0| 8d 44 64 4f 0d 0e ce 1b | 48 3d a8 28 4b 28 49 25 |.DdO....|H=.(K(I%|
|000025e0| 2c 33 29 2f a4 44 28 30 | 29 2a b3 28 38 29 29 0d |,3)/.D(0|)*.(8)).|
|000025f0| 0e d8 54 f2 70 72 69 6e | 74 65 72 28 32 2c 22 59 |..T.prin|ter(2,"Y|
|00002600| 22 2c c3 28 48 29 2b 22 | 20 55 4e 49 54 20 48 49 |",.(H)+"| UNIT HI|
|00002610| 54 20 46 52 4f 4d 20 53 | 45 43 54 4f 52 20 22 2b |T FROM S|ECTOR "+|
|00002620| c3 28 4b 28 49 25 2c 32 | 29 29 2b 22 2e 22 2b c3 |.(K(I%,2|))+"."+.|
|00002630| 28 4b 28 49 25 2c 31 29 | 29 2b 22 20 2e 2e 2e 2e |(K(I%,1)|)+" ....|
|00002640| 2e 22 29 0d 0e e2 15 53 | 53 3d 53 2d 48 20 3a 20 |.")....S|S=S-H : |
|00002650| e7 20 53 53 3c 30 20 8c | 0d 0e ec 1d 20 20 20 20 |. SS<0 .|.... |
|00002660| 20 3a 20 45 2b 3d 53 53 | 20 3a 20 48 2d 3d 53 20 | : E+=SS| : H-=S |
|00002670| 3a 20 53 3d 30 0d 0e f6 | 16 20 20 20 20 20 3a 20 |: S=0...|. : |
|00002680| e7 20 48 3c 30 20 8c 20 | 48 3d 30 0d 0f 00 12 cc |. H<0 . |H=0.....|
|00002690| 20 3a 20 53 3d 53 53 20 | 3a 20 48 3d 30 0d 0f 0a | : S=SS |: H=0...|
|000026a0| 05 cd 0d 0f 14 1a 57 3d | a6 28 34 30 29 20 3a 20 |......W=|.(40) : |
|000026b0| f2 75 70 64 61 74 65 42 | 61 6e 6b 73 0d 0f 1e 0c |.updateB|anks....|
|000026c0| e7 20 53 3c 3d 30 20 8c | 0d 0f 28 3d 20 20 20 20 |. S<=0 .|..(= |
|000026d0| 20 3a 20 f2 70 72 69 6e | 74 65 72 28 32 2c 22 52 | : .prin|ter(2,"R|
|000026e0| 22 2c 22 44 45 46 4c 45 | 43 54 4f 52 20 53 48 49 |","DEFLE|CTOR SHI|
|000026f0| 45 4c 44 53 20 41 52 45 | 20 44 4f 57 4e 20 2e 2e |ELDS ARE| DOWN ..|
|00002700| 2e 2e 2e 22 29 0d 0f 32 | 28 20 20 20 20 20 3a 20 |...")..2|( : |
|00002710| e7 20 45 3c 30 20 8c 20 | f2 73 70 61 63 65 20 3a |. E<0 . |.space :|
|00002720| 20 f2 64 65 61 64 28 33 | 29 20 3a 20 e1 0d 0f 3c | .dead(3|) : ...<|
|00002730| 40 cc 20 3a 20 f2 70 72 | 69 6e 74 65 72 28 32 2c |@. : .pr|inter(2,|
|00002740| 22 47 22 2c 22 53 48 49 | 45 4c 44 53 20 53 54 45 |"G","SHI|ELDS STE|
|00002750| 41 44 59 20 41 54 20 22 | 2b c3 28 53 29 2b 22 20 |ADY AT "|+.(S)+" |
|00002760| 55 4e 49 54 53 20 2e 2e | 2e 2e 2e 22 29 0d 0f 46 |UNITS ..|...")..F|
|00002770| 05 cd 0d 0f 50 0b 57 3d | a6 28 34 30 29 0d 0f 5a |....P.W=|.(40)..Z|
|00002780| 13 f2 64 61 6d 61 67 65 | 20 3a 20 f2 6d 6f 76 65 |..damage| : .move|
|00002790| 0d 0f 64 23 ed 20 3a 20 | f2 63 6c 65 61 72 28 31 |..d#. : |.clear(1|
|000027a0| 29 20 3a 20 f2 73 68 6f | 72 74 52 61 6e 67 65 53 |) : .sho|rtRangeS|
|000027b0| 63 61 6e 0d 0f 6e 05 e1 | 0d 0f 78 05 3a 0d 0f 82 |can..n..|..x.:...|
|000027c0| 0d dd 20 f2 64 61 6d 61 | 67 65 0d 0f 8c 15 e7 20 |.. .dama|ge..... |
|000027d0| 48 3c 31 30 30 20 80 20 | 53 3e 30 20 8c 20 e1 0d |H<100 . |S>0 . ..|
|000027e0| 0f 96 0f 52 31 3d a8 28 | b3 28 31 32 29 29 0d 0f |...R1=.(|.(12))..|
|000027f0| a0 0b e7 20 53 3e 30 20 | 8c 0d 0f aa 20 20 20 20 |... S>0 |.... |
|00002800| 20 20 3a 20 44 28 52 31 | 29 3d 44 28 52 31 29 2d | : D(R1|)=D(R1)-|
|00002810| a8 28 b3 28 32 29 2b 31 | 29 0d 0f b4 11 cc 20 3a |.(.(2)+1|)..... :|
|00002820| 20 e7 20 48 3c 31 30 30 | 20 8c 0d 0f be 20 20 20 | . H<100| .... |
|00002830| 20 20 20 3a 20 44 28 52 | 31 29 3d 44 28 52 31 29 | : D(R|1)=D(R1)|
|00002840| 2d a8 28 b3 28 32 29 2b | 32 29 0d 0f c8 1d cc 20 |-.(.(2)+|2)..... |
|00002850| 3a 20 44 28 52 31 29 3d | 44 28 52 31 29 2d a8 28 |: D(R1)=|D(R1)-.(|
|00002860| b3 28 35 29 2b 32 29 0d | 0f d2 05 cd 0d 0f dc 05 |.(5)+2).|........|
|00002870| cd 0d 0f e6 34 f2 70 72 | 69 6e 74 65 72 28 32 2c |....4.pr|inter(2,|
|00002880| 22 59 22 2c 44 24 28 52 | 31 29 2b 22 20 53 55 53 |"Y",D$(R|1)+" SUS|
|00002890| 54 41 49 4e 45 44 20 44 | 41 4d 41 47 45 20 2e 2e |TAINED D|AMAGE ..|
|000028a0| 2e 2e 2e 22 29 0d 0f f0 | 0e e7 20 48 3e 31 30 30 |...")...|.. H>100|
|000028b0| 30 20 8c 0d 0f fa 16 20 | 20 20 20 20 3a 20 52 31 |0 ..... | : R1|
|000028c0| 3d a8 28 b3 28 31 32 29 | 29 0d 10 04 12 20 20 20 |=.(.(12)|).... |
|000028d0| 20 20 3a 20 e7 20 53 3e | 30 20 8c 0d 10 0e 20 20 | : . S>|0 .... |
|000028e0| 20 20 20 20 3a 20 44 28 | 52 31 29 3d 44 28 52 31 | : D(|R1)=D(R1|
|000028f0| 29 2d a8 28 b3 28 32 29 | 2b 32 29 0d 10 18 1d cc |)-.(.(2)|+2).....|
|00002900| 20 3a 20 44 28 52 31 29 | 3d 44 28 52 31 29 2d a8 | : D(R1)|=D(R1)-.|
|00002910| 28 b3 28 35 29 2b 32 29 | 0d 10 22 05 cd 0d 10 2c |(.(5)+2)|.."....,|
|00002920| 3e 57 3d a6 28 34 30 29 | 20 3a 20 f2 70 72 69 6e |>W=.(40)| : .prin|
|00002930| 74 65 72 28 32 2c 22 59 | 22 2c 44 24 28 52 31 29 |ter(2,"Y|",D$(R1)|
|00002940| 2b 22 20 53 55 53 54 41 | 49 4e 45 44 20 44 41 4d |+" SUSTA|INED DAM|
|00002950| 41 47 45 20 2e 2e 2e 2e | 2e 22 29 0d 10 36 05 cd |AGE ....|.")..6..|
|00002960| 0d 10 40 11 f2 64 61 6d | 61 67 65 52 65 70 6f 72 |..@..dam|ageRepor|
|00002970| 74 0d 10 4a 05 e1 0d 10 | 54 05 3a 0d 10 5e 0e dd |t..J....|T.:..^..|
|00002980| 20 f2 64 65 61 64 28 61 | 29 0d 10 68 0d f2 63 6c | .dead(a|)..h..cl|
|00002990| 65 61 72 28 33 29 0d 10 | 72 32 f2 70 72 69 6e 74 |ear(3)..|r2.print|
|000029a0| 65 72 28 31 2c 22 59 22 | 2c 22 59 4f 55 52 20 4d |er(1,"Y"|,"YOUR M|
|000029b0| 49 53 53 49 4f 4e 20 48 | 41 53 20 45 4e 44 45 44 |ISSION H|AS ENDED|
|000029c0| 20 2e 2e 2e 2e 2e 22 29 | 0d 10 7c 2d f2 74 65 78 | .....")|..|-.tex|
|000029d0| 74 28 33 30 38 2c 37 30 | 38 2c 22 42 22 2c 22 53 |t(308,70|8,"B","S|
|000029e0| 54 41 52 54 52 45 4b 3a | 20 54 48 45 20 47 41 4d |TARTREK:| THE GAM|
|000029f0| 45 20 2d 22 29 0d 10 86 | 0a c8 8e 20 61 20 ca 0d |E -")...|... a ..|
|00002a00| 10 90 35 c9 20 31 20 3a | 20 f2 74 65 78 74 28 33 |..5. 1 :| .text(3|
|00002a10| 30 38 2c 36 35 32 2c 22 | 57 22 2c 22 54 48 45 20 |08,652,"|W","THE |
|00002a20| 45 4e 54 45 52 50 52 49 | 53 45 20 49 53 20 44 45 |ENTERPRI|SE IS DE|
|00002a30| 41 44 22 29 0d 10 9a 35 | 20 20 20 20 20 20 20 3a |AD")...5| :|
|00002a40| 20 f2 74 65 78 74 28 33 | 30 38 2c 36 30 34 2c 22 | .text(3|08,604,"|
|00002a50| 57 22 2c 22 49 4e 20 53 | 50 41 43 45 20 2d 20 59 |W","IN S|PACE - Y|
|00002a60| 4f 55 20 57 49 4c 4c 22 | 29 0d 10 a4 3a 20 20 20 |OU WILL"|)...: |
|00002a70| 20 20 20 20 3a 20 f2 74 | 65 78 74 28 33 30 38 2c | : .t|ext(308,|
|00002a80| 35 35 36 2c 22 57 22 2c | 22 53 55 46 46 45 52 20 |556,"W",|"SUFFER |
|00002a90| 41 20 53 4c 4f 57 20 43 | 4f 4c 44 20 44 45 41 54 |A SLOW C|OLD DEAT|
|00002aa0| 48 22 29 0d 10 ae 38 20 | 20 20 20 20 20 20 3a 20 |H")...8 | : |
|00002ab0| f2 74 65 78 74 28 33 30 | 38 2c 35 30 38 2c 22 57 |.text(30|8,508,"W|
|00002ac0| 22 2c 22 41 53 20 4c 49 | 46 45 20 53 55 50 50 4f |","AS LI|FE SUPPO|
|00002ad0| 52 54 20 46 41 49 4c 53 | 21 22 29 0d 10 b8 38 c9 |RT FAILS|!")...8.|
|00002ae0| 20 32 20 3a 20 f2 74 65 | 78 74 28 33 30 38 2c 36 | 2 : .te|xt(308,6|
|00002af0| 35 32 2c 22 57 22 2c 22 | 49 54 20 49 53 20 4e 4f |52,"W","|IT IS NO|
|00002b00| 57 20 53 44 20 22 2b c3 | 28 54 29 2b 22 20 41 4e |W SD "+.|(T)+" AN|
|00002b10| 44 22 29 0d 10 c2 38 20 | 20 20 20 20 20 20 3a 20 |D")...8 | : |
|00002b20| f2 74 65 78 74 28 33 30 | 38 2c 36 30 34 2c 22 57 |.text(30|8,604,"W|
|00002b30| 22 2c 22 59 4f 55 52 20 | 54 49 4d 45 20 48 41 53 |","YOUR |TIME HAS|
|00002b40| 20 52 55 4e 20 4f 55 54 | 21 22 29 0d 10 cc 36 c9 | RUN OUT|!")...6.|
|00002b50| 20 33 20 3a 20 f2 74 65 | 78 74 28 33 30 38 2c 36 | 3 : .te|xt(308,6|
|00002b60| 35 32 2c 22 59 22 2c 22 | 54 48 45 20 45 4e 54 45 |52,"Y","|THE ENTE|
|00002b70| 52 50 52 49 53 45 20 48 | 41 53 20 42 45 45 4e 22 |RPRISE H|AS BEEN"|
|00002b80| 29 0d 10 d6 31 20 20 20 | 20 20 20 20 3a 20 f2 74 |)...1 | : .t|
|00002b90| 65 78 74 28 33 30 38 2c | 36 30 34 2c 22 59 22 2c |ext(308,|604,"Y",|
|00002ba0| 22 44 45 53 54 52 4f 59 | 45 44 20 2e 2e 2e 2e 2e |"DESTROY|ED .....|
|00002bb0| 22 29 0d 10 e0 34 c9 20 | 34 20 3a 20 f2 74 65 78 |")...4. |4 : .tex|
|00002bc0| 74 28 33 30 38 2c 36 35 | 32 2c 22 42 22 2c 22 54 |t(308,65|2,"B","T|
|00002bd0| 48 45 20 4c 41 53 54 20 | 4b 4c 49 4e 47 4f 4e 20 |HE LAST |KLINGON |
|00002be0| 53 48 49 50 22 29 0d 10 | ea 34 20 20 20 20 20 20 |SHIP")..|.4 |
|00002bf0| 20 3a 20 f2 74 65 78 74 | 28 33 30 38 2c 36 30 34 | : .text|(308,604|
|00002c00| 2c 22 42 22 2c 22 49 53 | 20 44 45 53 54 52 4f 59 |,"B","IS| DESTROY|
|00002c10| 45 44 20 2e 2e 2e 2e 2e | 22 29 0d 10 f4 34 20 20 |ED .....|")...4 |
|00002c20| 20 20 20 20 20 3a 20 f2 | 74 65 78 74 28 33 30 38 | : .|text(308|
|00002c30| 2c 35 35 36 2c 22 57 22 | 2c 22 57 45 4c 4c 20 44 |,556,"W"|,"WELL D|
|00002c40| 4f 4e 45 20 43 41 50 54 | 41 49 4e 21 22 29 0d 10 |ONE CAPT|AIN!")..|
|00002c50| fe 2a 20 20 20 20 20 20 | 20 3a 20 44 65 61 64 25 |.* | : Dead%|
|00002c60| 3d b9 20 3a 20 f2 73 70 | 61 63 65 20 3a 20 f2 61 |=. : .sp|ace : .a|
|00002c70| 67 61 69 6e 20 3a 20 e1 | 0d 11 08 36 c9 20 35 20 |gain : .|...6. 5 |
|00002c80| 3a 20 f2 74 65 78 74 28 | 33 30 38 2c 36 35 32 2c |: .text(|308,652,|
|00002c90| 22 59 22 2c 22 59 4f 55 | 52 20 54 4f 52 50 45 44 |"Y","YOU|R TORPED|
|00002ca0| 4f 20 48 41 53 20 43 41 | 55 53 45 44 22 29 0d 11 |O HAS CA|USED")..|
|00002cb0| 12 39 20 20 20 20 20 20 | 20 3a 20 f2 74 65 78 74 |.9 | : .text|
|00002cc0| 28 33 30 38 2c 36 30 34 | 2c 22 59 22 2c 22 41 20 |(308,604|,"Y","A |
|00002cd0| 53 54 41 52 20 54 4f 20 | 47 4f 20 4e 4f 56 41 20 |STAR TO |GO NOVA |
|00002ce0| 2e 2e 2e 2e 2e 22 29 0d | 11 1c 39 20 20 20 20 20 |.....").|..9 |
|00002cf0| 20 20 3a 20 f2 74 65 78 | 74 28 33 30 38 2c 35 35 | : .tex|t(308,55|
|00002d00| 36 2c 22 59 22 2c 22 54 | 48 45 20 45 4e 54 45 52 |6,"Y","T|HE ENTER|
|00002d10| 50 52 49 53 45 20 48 41 | 53 20 42 45 45 4e 22 29 |PRISE HA|S BEEN")|
|00002d20| 0d 11 26 31 20 20 20 20 | 20 20 20 3a 20 f2 74 65 |..&1 | : .te|
|00002d30| 78 74 28 33 30 38 2c 35 | 30 38 2c 22 59 22 2c 22 |xt(308,5|08,"Y","|
|00002d40| 44 45 53 54 52 4f 59 45 | 44 20 2e 2e 2e 2e 2e 22 |DESTROYE|D ....."|
|00002d50| 29 0d 11 30 05 cb 0d 11 | 3a 35 f2 74 65 78 74 28 |)..0....|:5.text(|
|00002d60| 33 30 38 2c 34 36 30 2c | 22 52 22 2c 22 54 48 45 |308,460,|"R","THE|
|00002d70| 52 45 20 57 45 52 45 20 | 22 2b c3 28 4b 39 29 2b |RE WERE |"+.(K9)+|
|00002d80| 22 20 4b 4c 49 4e 47 4f | 4e 22 29 0d 11 44 2e f2 |" KLINGO|N")..D..|
|00002d90| 74 65 78 74 28 33 30 38 | 2c 34 31 32 2c 22 52 22 |text(308|,412,"R"|
|00002da0| 2c 22 53 48 49 50 53 20 | 4c 45 46 54 20 54 4f 20 |,"SHIPS |LEFT TO |
|00002db0| 43 4f 4e 51 55 45 52 22 | 29 0d 11 4e 29 f2 74 65 |CONQUER"|)..N).te|
|00002dc0| 78 74 28 33 30 38 2c 33 | 36 34 2c 22 52 22 2c 22 |xt(308,3|64,"R","|
|00002dd0| 54 48 45 20 46 45 44 45 | 52 41 54 49 4f 4e 21 21 |THE FEDE|RATION!!|
|00002de0| 22 29 0d 11 58 1d 44 65 | 61 64 25 3d b9 20 3a 20 |")..X.De|ad%=. : |
|00002df0| f2 73 70 61 63 65 20 3a | 20 f2 61 67 61 69 6e 0d |.space :| .again.|
|00002e00| 11 62 05 e1 0d 11 6c 05 | 3a 0d 11 76 0c dd 20 f2 |.b....l.|:..v.. .|
|00002e10| 61 67 61 69 6e 0d 11 80 | 18 57 3d a6 28 35 30 30 |again...|.W=.(500|
|00002e20| 29 20 3a 20 f2 63 6c 65 | 61 72 28 33 29 0d 11 8a |) : .cle|ar(3)...|
|00002e30| 2d f2 74 65 78 74 28 33 | 30 38 2c 37 30 38 2c 22 |-.text(3|08,708,"|
|00002e40| 42 22 2c 22 53 54 41 52 | 54 52 45 4b 3a 20 54 48 |B","STAR|TREK: TH|
|00002e50| 45 20 47 41 4d 45 20 2d | 22 29 0d 11 94 2f f2 74 |E GAME -|").../.t|
|00002e60| 65 78 74 28 33 30 38 2c | 36 35 32 2c 22 57 22 2c |ext(308,|652,"W",|
|00002e70| 22 57 4f 55 4c 44 20 59 | 4f 55 20 4c 49 4b 45 20 |"WOULD Y|OU LIKE |
|00002e80| 41 4e 4f 54 48 45 52 22 | 29 0d 11 9e 3a 59 24 3d |ANOTHER"|)...:Y$=|
|00002e90| a4 69 6e 70 75 74 56 61 | 72 69 6f 75 73 28 33 30 |.inputVa|rious(30|
|00002ea0| 38 2c 36 30 34 2c 37 32 | 34 2c 36 30 34 2c 22 57 |8,604,72|4,604,"W|
|00002eb0| 22 2c 22 4d 49 53 53 49 | 4f 4e 20 28 59 2d 4e 29 |","MISSI|ON (Y-N)|
|00002ec0| 3a 22 29 0d 11 a8 19 e7 | 20 59 24 3d 22 59 22 20 |:").....| Y$="Y" |
|00002ed0| 84 20 59 24 3d 22 79 22 | 20 8c 20 e1 0d 11 b2 15 |. Y$="y"| . .....|
|00002ee0| ff 20 22 50 52 49 4e 54 | 20 41 72 63 46 6f 6e 74 |. "PRINT| ArcFont|
|00002ef0| 22 0d 11 bc 0c eb 20 31 | 32 20 3a 20 e0 0d 11 c6 |"..... 1|2 : ....|
|00002f00| 05 e1 0d 11 d0 05 3a 0d | 11 da 10 dd 20 f2 62 61 |......:.|.... .ba|
|00002f10| 73 65 43 68 65 63 6b 0d | 11 e4 10 41 3d a4 62 61 |seCheck.|...A=.ba|
|00002f20| 73 65 43 68 65 63 6b 0d | 11 ee 12 e7 20 44 25 3d |seCheck.|.... D%=|
|00002f30| 30 20 80 20 41 3d 31 20 | 8c 0d 11 f8 2d 20 20 20 |0 . A=1 |....- |
|00002f40| 20 20 3a 20 44 25 3d 31 | 20 3a 20 53 3d 30 20 3a | : D%=1| : S=0 :|
|00002f50| 20 45 3d 45 30 20 3a 20 | 50 3d 50 30 20 3a 20 f2 | E=E0 : |P=P0 : .|
|00002f60| 64 6f 63 6b 65 64 0d 12 | 02 05 cd 0d 12 0c 17 e7 |docked..|........|
|00002f70| 20 44 25 3d 31 20 80 20 | 41 3d 30 20 8c 20 44 25 | D%=1 . |A=0 . D%|
|00002f80| 3d 30 0d 12 16 05 e1 0d | 12 20 05 3a 0d 12 2a 10 |=0......|. .:..*.|
|00002f90| dd 20 a4 62 61 73 65 43 | 68 65 63 6b 0d 12 34 27 |. .baseC|heck..4'|
|00002fa0| e3 20 49 25 3d 53 31 2d | 31 20 b8 20 53 31 2b 31 |. I%=S1-|1 . S1+1|
|00002fb0| 20 3a 20 e3 20 4a 25 3d | 53 32 2d 31 20 b8 20 53 | : . J%=|S2-1 . S|
|00002fc0| 32 2b 31 0d 12 3e 21 e7 | 20 49 25 3e 30 20 80 20 |2+1..>!.| I%>0 . |
|00002fd0| 49 25 3c 39 20 80 20 4a | 25 3e 30 20 80 20 4a 25 |I%<9 . J|%>0 . J%|
|00002fe0| 3c 39 20 8c 0d 12 48 31 | 20 20 20 20 20 3a 20 41 |<9 ...H1| : A|
|00002ff0| 24 3d 22 73 74 61 72 62 | 61 73 65 22 20 3a 20 5a |$="starb|ase" : Z|
|00003000| 31 3d 49 25 20 3a 20 5a | 32 3d 4a 25 20 3a 20 f2 |1=I% : Z|2=J% : .|
|00003010| 63 68 65 63 6b 0d 12 52 | 16 20 20 20 20 20 3a 20 |check..R|. : |
|00003020| e7 20 5a 33 3e 30 20 8c | 20 3d 31 0d 12 5c 05 cd |. Z3>0 .| =1..\..|
|00003030| 0d 12 66 07 ed 20 2c 0d | 12 70 06 3d 30 0d 12 7a |..f.. ,.|.p.=0..z|
|00003040| 05 3a 0d 12 84 0d dd 20 | f2 64 6f 63 6b 65 64 0d |.:..... |.docked.|
|00003050| 12 8e 3a f2 63 6c 65 61 | 72 28 31 29 20 3a 20 f2 |..:.clea|r(1) : .|
|00003060| 70 72 69 6e 74 65 72 28 | 31 2c 22 42 22 2c 22 44 |printer(|1,"B","D|
|00003070| 4f 43 4b 45 44 20 41 54 | 20 53 54 41 52 42 41 53 |OCKED AT| STARBAS|
|00003080| 45 20 2e 2e 2e 2e 2e 22 | 29 0d 12 98 3e f2 63 6c |E ....."|)...>.cl|
|00003090| 65 61 72 28 33 29 20 3a | 20 f2 74 65 78 74 28 33 |ear(3) :| .text(3|
|000030a0| 30 38 2c 37 30 38 2c 22 | 57 22 2c 22 57 45 4c 43 |08,708,"|W","WELC|
|000030b0| 4f 4d 45 20 54 4f 20 53 | 54 41 52 42 41 53 45 20 |OME TO S|TARBASE |
|000030c0| 2e 2e 2e 2e 2e 22 29 0d | 12 a2 10 f2 65 6e 65 72 |.....").|....ener|
|000030d0| 67 79 42 61 6e 6b 73 0d | 12 ac 34 f2 66 6f 6e 74 |gyBanks.|..4.font|
|000030e0| 28 33 30 38 2c 36 39 32 | 2c 35 2c 22 52 45 2d 41 |(308,692|,5,"RE-A|
|000030f0| 52 4d 49 4e 47 20 41 4e | 44 20 52 45 2d 46 55 45 |RMING AN|D RE-FUE|
|00003100| 4c 49 4e 47 20 48 41 56 | 45 22 29 0d 12 b6 38 f2 |LING HAV|E")...8.|
|00003110| 66 6f 6e 74 28 33 30 38 | 2c 36 35 32 2c 35 2c 22 |font(308|,652,5,"|
|00003120| 42 45 45 4e 20 43 41 52 | 52 49 45 44 20 4f 55 54 |BEEN CAR|RIED OUT|
|00003130| 20 41 53 20 4e 45 43 45 | 53 53 41 52 59 20 2e 2e | AS NECE|SSARY ..|
|00003140| 2e 22 29 0d 12 c0 38 f2 | 66 6f 6e 74 28 33 30 38 |.")...8.|font(308|
|00003150| 2c 36 31 32 2c 37 2c 22 | 44 49 41 47 4e 4f 53 54 |,612,7,"|DIAGNOST|
|00003160| 49 43 20 43 48 45 43 4b | 53 20 41 52 45 20 50 52 |IC CHECK|S ARE PR|
|00003170| 4f 43 45 45 44 49 4e 47 | 3a 22 29 0d 12 ca 25 f2 |OCEEDING|:")...%.|
|00003180| 64 61 6d 61 67 65 52 65 | 70 6f 72 74 20 3a 20 57 |damageRe|port : W|
|00003190| 3d a6 28 31 30 30 29 20 | 3a 20 f7 20 8d 54 78 53 |=.(100) |: . .TxS|
|000031a0| 0d 12 d4 2d 4e 25 3d 30 | 20 3a 20 4a 25 3d 30 20 |...-N%=0| : J%=0 |
|000031b0| 3a 20 58 3d 33 30 38 20 | 3a 20 59 3d 35 37 32 20 |: X=308 |: Y=572 |
|000031c0| 3a 20 e3 20 49 25 3d 31 | 20 b8 20 31 32 0d 12 de |: . I%=1| . 12...|
|000031d0| 30 e7 20 49 25 3d 37 20 | 8c 20 e6 20 30 20 3a 20 |0. I%=7 |. . 0 : |
|000031e0| c8 93 20 c8 90 20 33 30 | 38 2c 33 36 30 2c 37 30 |.. .. 30|8,360,70|
|000031f0| 30 2c 32 32 30 20 3a 20 | 59 3d 35 37 32 0d 12 e8 |0,220 : |Y=572...|
|00003200| 3f f3 20 63 6f 6c 20 3a | 20 f2 66 6f 6e 74 28 58 |?. col :| .font(X|
|00003210| 2c 59 2c 63 6f 6c 2c 44 | 24 28 49 25 29 29 20 3a |,Y,col,D|$(I%)) :|
|00003220| 20 f2 66 6f 6e 74 28 58 | 2b 35 30 30 2c 59 2c 63 | .font(X|+500,Y,c|
|00003230| 6f 6c 2c c3 28 44 28 49 | 25 29 29 29 0d 12 f2 27 |ol,.(D(I|%)))...'|
|00003240| e7 20 44 28 49 25 29 3c | 34 20 8c 20 4e 25 3d 4e |. D(I%)<|4 . N%=N|
|00003250| 25 2b 44 28 49 25 29 2d | 34 20 3a 20 4a 25 3d 4a |%+D(I%)-|4 : J%=J|
|00003260| 25 2b 31 0d 12 fc 18 59 | 2d 3d 33 36 20 3a 20 57 |%+1....Y|-=36 : W|
|00003270| 3d a6 28 31 30 30 29 20 | 3a 20 ed 0d 13 06 0c e7 |=.(100) |: ......|
|00003280| 20 4a 25 3e 30 20 8c 0d | 13 10 2a 20 20 20 20 20 | J%>0 ..|..* |
|00003290| 3a 20 54 6c 3d 94 28 28 | 4e 25 2f 4a 25 29 2f 34 |: Tl=.((|N%/J%)/4|
|000032a0| 29 20 3a 20 e7 20 54 6c | 3e 35 20 8c 20 54 6c 3d |) : . Tl|>5 . Tl=|
|000032b0| 35 0d 13 1a 09 cc 20 3a | 20 e1 0d 13 24 05 cd 0d |5..... :| ...$...|
|000032c0| 13 2e 0d f2 63 6c 65 61 | 72 28 33 29 0d 13 38 1d |....clea|r(3)..8.|
|000032d0| dc 20 38 2c 38 2c 38 2c | 32 2c 32 2c 32 2c 33 2c |. 8,8,8,|2,2,2,3,|
|000032e0| 33 2c 35 2c 35 2c 36 2c | 36 0d 13 42 31 f2 74 65 |3,5,5,6,|6..B1.te|
|000032f0| 78 74 28 33 30 38 2c 37 | 30 38 2c 22 42 22 2c 22 |xt(308,7|08,"B","|
|00003300| 53 54 41 52 42 41 53 45 | 20 43 4f 4e 54 52 4f 4c |STARBASE| CONTROL|
|00003310| 20 52 45 50 4f 52 54 3a | 22 29 0d 13 4c 2d f2 74 | REPORT:|")..L-.t|
|00003320| 65 78 74 28 33 30 38 2c | 36 35 36 2c 22 59 22 2c |ext(308,|656,"Y",|
|00003330| 22 45 53 54 49 4d 41 54 | 45 44 20 54 49 4d 45 20 |"ESTIMAT|ED TIME |
|00003340| 46 4f 52 20 41 22 29 0d | 13 56 2f f2 74 65 78 74 |FOR A").|.V/.text|
|00003350| 28 33 30 38 2c 36 30 34 | 2c 22 59 22 2c 22 43 4f |(308,604|,"Y","CO|
|00003360| 4d 50 4c 45 54 45 20 53 | 59 53 54 45 4d 53 20 52 |MPLETE S|YSTEMS R|
|00003370| 45 46 49 54 22 29 0d 13 | 60 33 f2 74 65 78 74 28 |EFIT")..|`3.text(|
|00003380| 33 30 38 2c 35 35 32 2c | 22 59 22 2c 22 3a 20 22 |308,552,|"Y",": "|
|00003390| 2b c0 c3 28 54 6c 29 2c | 34 29 2b 22 20 53 54 41 |+..(Tl),|4)+" STA|
|000033a0| 52 44 41 54 45 53 2e 22 | 29 0d 13 6a 2f f2 74 65 |RDATES."|)..j/.te|
|000033b0| 78 74 28 33 30 38 2c 35 | 30 30 2c 22 42 22 2c 22 |xt(308,5|00,"B","|
|000033c0| 50 52 4f 43 45 45 44 20 | 57 49 54 48 20 52 45 46 |PROCEED |WITH REF|
|000033d0| 49 54 54 49 4e 47 22 29 | 0d 13 74 32 41 24 3d a4 |ITTING")|..t2A$=.|
|000033e0| 69 6e 70 75 74 56 61 72 | 69 6f 75 73 28 33 30 38 |inputVar|ious(308|
|000033f0| 2c 34 34 38 2c 35 35 36 | 2c 34 34 38 2c 22 42 22 |,448,556|,448,"B"|
|00003400| 2c 22 28 59 2d 4e 29 3a | 22 29 0d 13 7e 12 e7 20 |,"(Y-N):|")..~.. |
|00003410| c0 41 24 2c 31 29 3d 22 | 59 22 20 8c 0d 13 88 18 |.A$,1)="|Y" .....|
|00003420| 20 20 20 20 20 3a 20 4e | 25 3d 34 20 3a 20 54 3d | : N|%=4 : T=|
|00003430| 54 2b 54 6c 0d 13 92 09 | cc 20 3a 20 e1 0d 13 9c |T+Tl....|. : ....|
|00003440| 05 cd 0d 13 a6 36 f2 63 | 6c 65 61 72 28 33 29 20 |.....6.c|lear(3) |
|00003450| 3a 20 f2 74 65 78 74 28 | 33 30 38 2c 37 30 38 2c |: .text(|308,708,|
|00003460| 22 42 22 2c 22 53 54 41 | 52 42 41 53 45 20 43 4f |"B","STA|RBASE CO|
|00003470| 4e 54 52 4f 4c 3a 22 29 | 0d 13 b0 2d f2 74 65 78 |NTROL:")|...-.tex|
|00003480| 74 28 33 30 38 2c 36 35 | 36 2c 22 42 22 2c 22 45 |t(308,65|6,"B","E|
|00003490| 4e 47 49 4e 45 45 52 49 | 4e 47 20 52 45 50 4f 52 |NGINEERI|NG REPOR|
|000034a0| 54 20 2d 22 29 0d 13 ba | 0f e3 20 49 25 3d 31 20 |T -")...|.. I%=1 |
|000034b0| b8 20 31 32 0d 13 c4 0e | c8 95 20 44 28 49 25 29 |. 12....|.. D(I%)|
|000034c0| 3c 34 0d 13 ce 0b 44 28 | 49 25 29 3d 34 0d 13 d8 |<4....D(|I%)=4...|
|000034d0| 05 ce 0d 13 e2 05 ed 0d | 13 ec 11 f2 64 61 6d 61 |........|....dama|
|000034e0| 67 65 52 65 70 6f 72 74 | 0d 13 f6 2a 4d 59 53 25 |geReport|...*MYS%|
|000034f0| 3d a3 20 3a 20 44 49 4c | 25 3d a3 20 3a 20 4e 45 |=. : DIL|%=. : NE|
|00003500| 55 25 3d a3 20 3a 20 f2 | 75 70 64 61 74 65 54 69 |U%=. : .|updateTi|
|00003510| 6d 65 0d 14 00 2e f2 74 | 65 78 74 28 33 30 38 2c |me.....t|ext(308,|
|00003520| 36 30 34 2c 22 57 22 2c | 22 41 4c 4c 20 53 59 53 |604,"W",|"ALL SYS|
|00003530| 54 45 4d 53 20 4e 4f 57 | 20 46 55 4c 4c 59 22 29 |TEMS NOW| FULLY")|
|00003540| 0d 14 0a 34 f2 74 65 78 | 74 28 33 30 38 2c 35 35 |...4.tex|t(308,55|
|00003550| 32 2c 22 57 22 2c 22 46 | 55 4e 43 54 49 4f 4e 41 |2,"W","F|UNCTIONA|
|00003560| 4c 20 2e 2e 2e 2e 2e 22 | 29 20 3a 20 57 3d a6 28 |L ....."|) : W=.(|
|00003570| 31 30 30 29 0d 14 14 05 | e1 0d 14 1e 05 3a 0d 14 |100)....|.....:..|
|00003580| 28 13 dd 20 f2 73 74 61 | 74 75 73 52 65 70 6f 72 |(.. .sta|tusRepor|
|00003590| 74 0d 14 32 0d f2 63 6c | 65 61 72 28 32 29 0d 14 |t..2..cl|ear(2)..|
|000035a0| 3c 19 58 3d 33 32 20 3a | 20 59 3d 37 34 30 20 3a |<.X=32 :| Y=740 :|
|000035b0| 20 f7 20 8d 54 44 55 0d | 14 46 14 e3 20 61 3d 30 | . .TDU.|.F.. a=0|
|000035c0| 20 b8 20 36 20 3a 20 f3 | 20 61 24 0d 14 50 0a c8 | . 6 : .| a$..P..|
|000035d0| 8e 20 61 20 ca 0d 14 5a | 19 c9 20 30 20 3a 20 f2 |. a ...Z|.. 0 : .|
|000035e0| 66 6f 6e 74 28 58 2c 59 | 2c 32 2c 61 24 29 0d 14 |font(X,Y|,2,a$)..|
|000035f0| 64 28 20 20 20 20 20 20 | 20 3a 20 f2 66 6f 6e 74 |d( | : .font|
|00003600| 28 58 2c 59 2d 33 32 2c | 33 2c 22 3a 41 4c 44 45 |(X,Y-32,|3,":ALDE|
|00003610| 56 52 4f 4e 22 29 0d 14 | 6e 19 c9 20 31 20 3a 20 |VRON")..|n.. 1 : |
|00003620| f2 66 6f 6e 74 28 58 2c | 59 2c 36 2c 61 24 29 0d |.font(X,|Y,6,a$).|
|00003630| 14 78 26 20 20 20 20 20 | 20 20 3a 20 f2 66 6f 6e |.x& | : .fon|
|00003640| 74 28 58 2c 59 2d 33 32 | 2c 33 2c 22 3a 22 2b c3 |t(X,Y-32|,3,":"+.|
|00003650| 28 42 39 29 29 0d 14 82 | 19 c9 20 32 20 3a 20 f2 |(B9))...|.. 2 : .|
|00003660| 66 6f 6e 74 28 58 2c 59 | 2c 38 2c 61 24 29 0d 14 |font(X,Y|,8,a$)..|
|00003670| 8c 33 20 20 20 20 20 20 | 20 3a 20 f2 66 6f 6e 74 |.3 | : .font|
|00003680| 28 58 2c 59 2d 33 32 2c | 33 2c 22 3a 22 2b c3 28 |(X,Y-32,|3,":"+.(|
|00003690| 28 a8 28 54 38 2d 54 29 | 2a 31 30 29 2f 31 30 29 |(.(T8-T)|*10)/10)|
|000036a0| 29 0d 14 96 19 c9 20 33 | 20 3a 20 f2 66 6f 6e 74 |)..... 3| : .font|
|000036b0| 28 58 2c 59 2c 31 2c 61 | 24 29 0d 14 a0 26 20 20 |(X,Y,1,a|$)...& |
|000036c0| 20 20 20 20 20 3a 20 f2 | 66 6f 6e 74 28 58 2c 59 | : .|font(X,Y|
|000036d0| 2d 33 32 2c 33 2c 22 3a | 22 2b c3 28 4b 39 29 29 |-32,3,":|"+.(K9))|
|000036e0| 0d 14 aa 19 c9 20 34 20 | 3a 20 f2 66 6f 6e 74 28 |..... 4 |: .font(|
|000036f0| 58 2c 59 2c 38 2c 61 24 | 29 0d 14 b4 25 20 20 20 |X,Y,8,a$|)...% |
|00003700| 20 20 20 20 3a 20 f2 66 | 6f 6e 74 28 58 2c 59 2d | : .f|ont(X,Y-|
|00003710| 33 32 2c 33 2c 22 3a 22 | 2b c3 28 45 29 29 0d 14 |32,3,":"|+.(E))..|
|00003720| be 19 c9 20 35 20 3a 20 | f2 66 6f 6e 74 28 58 2c |... 5 : |.font(X,|
|00003730| 59 2c 36 2c 61 24 29 0d | 14 c8 25 20 20 20 20 20 |Y,6,a$).|..% |
|00003740| 20 20 3a 20 f2 66 6f 6e | 74 28 58 2c 59 2d 33 32 | : .fon|t(X,Y-32|
|00003750| 2c 33 2c 22 3a 22 2b c3 | 28 53 29 29 0d 14 d2 19 |,3,":"+.|(S))....|
|00003760| c9 20 36 20 3a 20 f2 66 | 6f 6e 74 28 58 2c 59 2c |. 6 : .f|ont(X,Y,|
|00003770| 32 2c 61 24 29 0d 14 dc | 25 20 20 20 20 20 20 20 |2,a$)...|% |
|00003780| 3a 20 f2 66 6f 6e 74 28 | 58 2c 59 2d 33 32 2c 33 |: .font(|X,Y-32,3|
|00003790| 2c 22 3a 22 2b c3 28 50 | 29 29 0d 14 e6 05 cb 0d |,":"+.(P|))......|
|000037a0| 14 f0 0d 59 2d 3d 36 38 | 20 3a 20 ed 0d 14 fa 05 |...Y-=68| : .....|
|000037b0| 3a 0d 15 04 44 dc 20 53 | 59 53 54 45 4d 2c 53 54 |:...D. S|YSTEM,ST|
|000037c0| 41 52 42 41 53 45 53 2c | 54 49 4d 45 20 4c 45 46 |ARBASES,|TIME LEF|
|000037d0| 54 2c 4b 4c 49 4e 47 4f | 4e 53 2c 45 4e 45 52 47 |T,KLINGO|NS,ENERG|
|000037e0| 59 2c 44 45 46 4c 45 43 | 54 4f 52 2c 54 4f 52 50 |Y,DEFLEC|TOR,TORP|
|000037f0| 45 44 4f 45 53 0d 15 0e | 05 3a 0d 15 18 05 e1 0d |EDOES...|.:......|
|00003800| 15 22 05 3a 0d 15 2c 10 | dd 20 f2 70 68 6f 74 6f |.".:..,.|. .photo|
|00003810| 6e 41 69 6d 0d 15 36 0e | e7 20 44 28 39 29 3c 30 |nAim..6.|. D(9)<0|
|00003820| 20 8c 0d 15 40 2d 20 20 | 20 20 20 3a 20 f2 66 6f | ...@- | : .fo|
|00003830| 6e 74 28 33 32 34 2c 32 | 32 38 2c 31 2c 22 43 4f |nt(324,2|28,1,"CO|
|00003840| 4d 42 41 54 20 43 4f 4d | 50 55 54 45 52 22 29 0d |MBAT COM|PUTER").|
|00003850| 15 4a 2b 20 20 20 20 20 | 3a 20 f2 66 6f 6e 74 28 |.J+ |: .font(|
|00003860| 33 32 34 2c 31 39 32 2c | 31 2c 22 49 53 20 44 4f |324,192,|1,"IS DO|
|00003870| 57 4e 20 2e 2e 2e 2e 2e | 22 29 0d 15 54 0c 20 20 |WN .....|")..T. |
|00003880| 20 20 20 3a 20 e1 0d 15 | 5e 05 cd 0d 15 68 0c e7 | : ...|^....h..|
|00003890| 20 4b 33 3c 31 20 8c 0d | 15 72 1a 20 20 20 20 20 | K3<1 ..|.r. |
|000038a0| 3a 20 f2 6e 6f 4b 6c 69 | 6e 67 6f 6e 73 20 3a 20 |: .noKli|ngons : |
|000038b0| e1 0d 15 7c 05 cd 0d 15 | 86 0d f2 63 6c 65 61 72 |...|....|...clear|
|000038c0| 28 33 29 0d 15 90 2f f2 | 74 65 78 74 28 33 30 38 |(3).../.|text(308|
|000038d0| 2c 37 30 38 2c 22 52 22 | 2c 22 41 49 4d 49 4e 47 |,708,"R"|,"AIMING|
|000038e0| 20 44 41 54 41 20 46 4f | 52 20 45 4e 45 4d 59 3a | DATA FO|R ENEMY:|
|000038f0| 22 29 0d 15 9a 20 51 25 | 3d 36 34 38 20 3a 20 e3 |")... Q%|=648 : .|
|00003900| 20 49 25 3d 31 20 b8 20 | 33 20 3a 20 50 25 3d 34 | I%=1 . |3 : P%=4|
|00003910| 32 30 0d 15 a4 17 e7 20 | 4b 28 49 25 2c 33 29 3c |20..... |K(I%,3)<|
|00003920| 3d 30 20 8c 20 8d 64 4c | 55 0d 15 ae 29 43 31 3d |=0 . .dL|U...)C1=|
|00003930| 53 31 20 3a 20 41 3d 53 | 32 20 3a 20 57 31 3d 4b |S1 : A=S|2 : W1=K|
|00003940| 28 49 25 2c 31 29 20 3a | 20 58 3d 4b 28 49 25 2c |(I%,1) :| X=K(I%,|
|00003950| 32 29 0d 15 b8 23 f2 74 | 65 78 74 28 33 30 38 2c |2)...#.t|ext(308,|
|00003960| 51 25 2c 22 52 22 2c 22 | 28 22 2b c3 28 49 25 29 |Q%,"R","|("+.(I%)|
|00003970| 2b 22 29 22 29 0d 15 c2 | 0a e4 20 8d 64 50 56 0d |+")")...|.. .dPV.|
|00003980| 15 cc 0f 51 25 2d 3d 31 | 31 36 20 3a 20 ed 0d 15 |...Q%-=1|16 : ...|
|00003990| d6 05 e1 0d 15 e0 05 3a | 0d 15 ea 17 dd 20 f2 63 |.......:|..... .c|
|000039a0| 6f 75 72 73 65 43 61 6c | 63 75 6c 61 74 6f 72 0d |ourseCal|culator.|
|000039b0| 15 f4 0f e7 20 44 28 31 | 30 29 3c 30 20 8c 0d 15 |.... D(1|0)<0 ...|
|000039c0| fe 27 20 20 20 20 20 3a | 20 f2 66 6f 6e 74 28 31 |.' :| .font(1|
|000039d0| 30 38 34 2c 32 32 38 2c | 31 2c 22 4e 41 56 20 43 |084,228,|1,"NAV C|
|000039e0| 4f 4d 50 22 29 0d 16 08 | 27 20 20 20 20 20 3a 20 |OMP")...|' : |
|000039f0| f2 66 6f 6e 74 28 31 30 | 38 34 2c 31 39 32 2c 31 |.font(10|84,192,1|
|00003a00| 2c 22 44 49 53 41 42 4c | 45 44 22 29 0d 16 12 0c |,"DISABL|ED")....|
|00003a10| 20 20 20 20 20 3a 20 e1 | 0d 16 1c 05 cd 0d 16 26 | : .|.......&|
|00003a20| 14 f2 63 6c 65 61 72 28 | 33 29 20 3a 20 53 25 3d |..clear(|3) : S%=|
|00003a30| 31 0d 16 30 2b f2 74 65 | 78 74 28 33 30 38 2c 37 |1..0+.te|xt(308,7|
|00003a40| 30 38 2c 22 57 22 2c 22 | 43 4f 55 52 53 45 20 43 |08,"W","|COURSE C|
|00003a50| 41 4c 43 55 4c 41 54 4f | 52 3a 22 29 0d 16 3a 30 |ALCULATO|R:")..:0|
|00003a60| f2 74 65 78 74 28 33 30 | 38 2c 36 35 36 2c 22 47 |.text(30|8,656,"G|
|00003a70| 22 2c 22 49 4e 20 54 48 | 49 53 20 53 45 43 54 4f |","IN TH|IS SECTO|
|00003a80| 52 20 4f 52 20 41 20 4e | 45 57 22 29 0d 16 44 3b |R OR A N|EW")..D;|
|00003a90| 41 24 3d a4 69 6e 70 75 | 74 56 61 72 69 6f 75 73 |A$=.inpu|tVarious|
|00003aa0| 28 33 30 38 2c 36 30 34 | 2c 37 37 32 2c 36 30 34 |(308,604|,772,604|
|00003ab0| 2c 22 47 22 2c 22 51 55 | 41 44 52 41 4e 54 20 28 |,"G","QU|ADRANT (|
|00003ac0| 53 2d 51 29 3a 22 29 0d | 16 4e 22 42 24 3d 22 22 |S-Q):").|.N"B$=""|
|00003ad0| 20 3a 20 e7 20 41 24 3d | 22 53 22 20 8c 20 42 24 | : . A$=|"S" . B$|
|00003ae0| 3d 22 53 45 43 54 4f 52 | 22 0d 16 58 23 e7 20 41 |="SECTOR|"..X#. A|
|00003af0| 24 3d 22 51 22 20 8c 20 | 42 24 3d 22 51 55 41 44 |$="Q" . |B$="QUAD|
|00003b00| 52 41 4e 54 22 20 3a 20 | 53 25 3d 30 0d 16 62 25 |RANT" : |S%=0..b%|
|00003b10| e7 20 42 24 3d 22 22 20 | 8c 20 57 3d a6 28 31 35 |. B$="" |. W=.(15|
|00003b20| 29 20 3a 20 f2 63 6c 65 | 61 72 28 33 29 20 3a 20 |) : .cle|ar(3) : |
|00003b30| e1 0d 16 6c 24 f2 74 65 | 78 74 28 33 30 38 2c 35 |...l$.te|xt(308,5|
|00003b40| 35 32 2c 22 59 22 2c 22 | 43 4f 4f 52 44 49 4e 41 |52,"Y","|COORDINA|
|00003b50| 54 45 53 22 29 0d 16 76 | 2c 58 3d a4 69 6e 70 75 |TES")..v|,X=.inpu|
|00003b60| 74 4e 75 6d 62 65 72 28 | 37 30 34 2c 35 35 32 2c |tNumber(|704,552,|
|00003b70| 37 37 32 2c 35 35 32 2c | 22 59 22 2c 22 58 3a 22 |772,552,|"Y","X:"|
|00003b80| 29 0d 16 80 2d 57 31 3d | a4 69 6e 70 75 74 4e 75 |)...-W1=|.inputNu|
|00003b90| 6d 62 65 72 28 37 30 34 | 2c 35 30 30 2c 37 37 32 |mber(704|,500,772|
|00003ba0| 2c 35 30 30 2c 22 59 22 | 2c 22 59 3a 22 29 0d 16 |,500,"Y"|,"Y:")..|
|00003bb0| 8a 1f e7 20 58 3c 31 20 | 84 20 58 3e 38 20 84 20 |... X<1 |. X>8 . |
|00003bc0| 57 31 3c 31 20 84 20 57 | 31 3e 38 20 8c 0d 16 94 |W1<1 . W|1>8 ....|
|00003bd0| 22 20 20 20 20 20 3a 20 | 57 3d a6 28 31 35 29 20 |" : |W=.(15) |
|00003be0| 3a 20 f2 63 6c 65 61 72 | 28 33 29 20 3a 20 e1 0d |: .clear|(3) : ..|
|00003bf0| 16 9e 05 cd 0d 16 a8 31 | 43 31 3d 53 31 20 3a 20 |.......1|C1=S1 : |
|00003c00| 41 3d 53 32 20 3a 20 e7 | 20 42 24 3d 22 51 55 41 |A=S2 : .| B$="QUA|
|00003c10| 44 52 41 4e 54 22 20 8c | 20 43 31 3d 51 31 20 3a |DRANT" .| C1=Q1 :|
|00003c20| 20 41 3d 51 32 0d 16 b2 | 1c 50 25 3d 33 30 38 20 | A=Q2...|.P%=308 |
|00003c30| 3a 20 51 25 3d 34 33 32 | 20 3a 20 e4 20 8d 64 50 |: Q%=432| : . .dP|
|00003c40| 56 0d 16 bc 05 e1 0d 16 | c6 05 3a 0d 16 d0 13 58 |V.......|..:....X|
|00003c50| 3d 58 2d 41 20 3a 20 41 | 3d 43 31 2d 57 31 0d 16 |=X-A : A|=C1-W1..|
|00003c60| da 12 e7 20 58 3c 30 20 | 8c 20 e5 20 8d 44 52 57 |... X<0 |. . .DRW|
|00003c70| 0d 16 e4 12 e7 20 41 3c | 30 20 8c 20 e5 20 8d 74 |..... A<|0 . . .t|
|00003c80| 58 57 0d 16 ee 12 e7 20 | 58 3e 30 20 8c 20 e5 20 |XW..... |X>0 . . |
|00003c90| 8d 54 4c 57 0d 16 f8 12 | e7 20 41 3d 30 20 8c 20 |.TLW....|. A=0 . |
|00003ca0| e5 20 8d 44 70 57 0d 17 | 02 05 3a 0d 17 0c 08 43 |. .DpW..|..:....C|
|00003cb0| 31 3d 30 0d 17 16 19 e7 | 20 94 28 58 29 3c 3d 94 |1=0.....| .(X)<=.|
|00003cc0| 28 41 29 20 8c 20 e5 20 | 8d 54 74 57 0d 17 20 23 |(A) . . |.TtW.. #|
|00003cd0| 44 52 3d 43 31 2b 28 28 | 28 94 28 58 29 2d 94 28 |DR=C1+((|(.(X)-.(|
|00003ce0| 41 29 29 2b 94 28 58 29 | 29 2f 94 28 58 29 29 0d |A))+.(X)|)/.(X)).|
|00003cf0| 17 2a 0a e5 20 8d 64 4a | 57 0d 17 34 15 44 52 3d |.*.. .dJ|W..4.DR=|
|00003d00| 43 31 2b 28 94 28 58 29 | 2f 94 28 41 29 29 0d 17 |C1+(.(X)|/.(A))..|
|00003d10| 3e 0a e5 20 8d 64 4a 57 | 0d 17 48 05 3a 0d 17 52 |>.. .dJW|..H.:..R|
|00003d20| 12 e7 20 41 3e 30 20 8c | 20 e5 20 8d 74 44 57 0d |.. A>0 .| . .tDW.|
|00003d30| 17 5c 12 e7 20 58 3d 30 | 20 8c 20 e5 20 8d 74 58 |.\.. X=0| . . .tX|
|00003d40| 57 0d 17 66 05 3a 0d 17 | 70 0d e7 20 58 3d 30 20 |W..f.:..|p.. X=0 |
|00003d50| 8c 20 f8 0d 17 7a 11 43 | 31 3d 34 20 3a 20 e5 20 |. ...z.C|1=4 : . |
|00003d60| 8d 54 56 57 0d 17 84 11 | 43 31 3d 36 20 3a 20 e5 |.TVW....|C1=6 : .|
|00003d70| 20 8d 74 62 57 0d 17 8e | 05 3a 0d 17 98 08 43 31 | .tbW...|.:....C1|
|00003d80| 3d 32 0d 17 a2 19 e7 20 | 94 28 58 29 3e 3d 94 28 |=2..... |.(X)>=.(|
|00003d90| 41 29 20 8c 20 e5 20 8d | 64 40 57 0d 17 ac 23 44 |A) . . .|d@W...#D|
|00003da0| 52 3d 43 31 2b 28 28 28 | 94 28 41 29 2d 94 28 58 |R=C1+(((|.(A)-.(X|
|00003db0| 29 29 2b 94 28 41 29 29 | 2f 94 28 41 29 29 0d 17 |))+.(A))|/.(A))..|
|00003dc0| b6 09 e5 8d 64 4a 57 0d | 17 c0 15 44 52 3d 43 31 |....dJW.|...DR=C1|
|00003dd0| 2b 28 94 28 41 29 2f 94 | 28 58 29 29 0d 17 ca 0f |+(.(A)/.|(X))....|
|00003de0| 62 65 61 72 24 3d c3 28 | 44 52 29 0d 17 d4 0c e7 |bear$=.(|DR).....|
|00003df0| 20 53 25 3d 30 20 8c 0d | 17 de 21 20 20 20 20 20 | S%=0 ..|..! |
|00003e00| 3a 20 64 69 73 74 24 3d | c3 28 a8 28 b6 28 58 2a |: dist$=|.(.(.(X*|
|00003e10| 58 2b 41 2a 41 29 29 29 | 0d 17 e8 1e cc 20 3a 20 |X+A*A)))|..... : |
|00003e20| 64 69 73 74 24 3d c3 28 | b6 28 58 2a 58 2b 41 2a |dist$=.(|.(X*X+A*|
|00003e30| 41 29 2f 31 30 29 0d 17 | f2 05 cd 0d 17 fc 2b f2 |A)/10)..|......+.|
|00003e40| 74 65 78 74 28 50 25 2c | 51 25 2c 22 57 22 2c 22 |text(P%,|Q%,"W","|
|00003e50| 42 45 41 52 49 4e 47 3a | 20 20 22 2b c0 62 65 61 |BEARING:| "+.bea|
|00003e60| 72 24 2c 34 29 29 0d 18 | 06 2e f2 74 65 78 74 28 |r$,4))..|...text(|
|00003e70| 50 25 2c 51 25 2d 35 32 | 2c 22 57 22 2c 22 44 49 |P%,Q%-52|,"W","DI|
|00003e80| 53 54 41 4e 43 45 3a 20 | 22 2b c0 64 69 73 74 24 |STANCE: |"+.dist$|
|00003e90| 2c 34 29 29 0d 18 10 05 | f8 0d 18 1a 05 3a 0d 18 |,4))....|.....:..|
|00003ea0| 24 0a dd 20 f2 72 6e 64 | 0d 18 2e 15 52 31 3d b3 |$.. .rnd|....R1=.|
|00003eb0| 28 38 29 20 3a 20 52 32 | 3d b3 28 38 29 0d 18 38 |(8) : R2|=.(8)..8|
|00003ec0| 22 41 24 3d 22 22 20 3a | 20 5a 31 3d 52 31 20 3a |"A$="" :| Z1=R1 :|
|00003ed0| 20 5a 32 3d 52 32 20 3a | 20 f2 63 68 65 63 6b 0d | Z2=R2 :| .check.|
|00003ee0| 18 42 11 e7 20 5a 33 3d | 30 20 8c 20 8d 54 6e 58 |.B.. Z3=|0 . .TnX|
|00003ef0| 0d 18 4c 05 e1 0d 18 56 | 05 3a 0d 18 60 0c dd 20 |..L....V|.:..`.. |
|00003f00| f2 63 68 65 63 6b 0d 18 | 6a 20 5a 33 3d 30 20 3a |.check..|j Z3=0 :|
|00003f10| 20 e7 20 51 24 28 5a 31 | 2c 5a 32 29 3d 41 24 20 | . Q$(Z1|,Z2)=A$ |
|00003f20| 8c 20 5a 33 3d 31 0d 18 | 74 05 e1 0d 18 7e 05 3a |. Z3=1..|t....~.:|
|00003f30| 0d 18 88 11 dd 20 f2 68 | 79 70 65 72 50 72 6f 62 |..... .h|yperProb|
|00003f40| 65 0d 18 92 0d f2 63 6c | 65 61 72 28 33 29 0d 18 |e.....cl|ear(3)..|
|00003f50| 9c 0e e7 20 44 28 33 29 | 3c 30 20 8c 0d 18 a6 38 |... D(3)|<0 ....8|
|00003f60| 20 20 20 20 20 3a 20 f2 | 74 65 78 74 28 33 30 38 | : .|text(308|
|00003f70| 2c 37 30 38 2c 22 52 22 | 2c 22 48 59 50 45 52 50 |,708,"R"|,"HYPERP|
|00003f80| 52 4f 42 45 20 44 41 4d | 41 47 45 44 20 2e 2e 2e |ROBE DAM|AGED ...|
|00003f90| 2e 2e 22 29 0d 18 b0 0c | 20 20 20 20 20 3a 20 e1 |..")....| : .|
|00003fa0| 0d 18 ba 05 cd 0d 18 c4 | 0d e7 20 51 34 3c 3e 30 |........|.. Q4<>0|
|00003fb0| 20 8c 0d 18 ce 35 20 20 | 20 20 20 3a 20 f2 74 65 | ....5 | : .te|
|00003fc0| 78 74 28 33 30 38 2c 37 | 30 38 2c 22 52 22 2c 22 |xt(308,7|08,"R","|
|00003fd0| 48 59 50 45 52 50 52 4f | 42 45 20 49 53 20 41 4c |HYPERPRO|BE IS AL|
|00003fe0| 52 45 41 44 59 22 29 0d | 18 d8 2e 20 20 20 20 20 |READY").|... |
|00003ff0| 3a 20 f2 74 65 78 74 28 | 33 30 38 2c 36 35 36 2c |: .text(|308,656,|
|00004000| 22 52 22 2c 22 4c 41 55 | 4e 43 48 45 44 20 2e 2e |"R","LAU|NCHED ..|
|00004010| 2e 2e 2e 22 29 0d 18 e2 | 0c 20 20 20 20 20 3a 20 |...")...|. : |
|00004020| e1 0d 18 ec 05 cd 0d 18 | f6 2d f2 74 65 78 74 28 |........|.-.text(|
|00004030| 33 30 38 2c 37 30 38 2c | 22 59 22 2c 22 4c 41 55 |308,708,|"Y","LAU|
|00004040| 4e 43 48 20 48 59 50 45 | 52 50 52 4f 42 45 20 54 |NCH HYPE|RPROBE T|
|00004050| 4f 22 29 0d 19 00 23 f2 | 74 65 78 74 28 33 30 38 |O")...#.|text(308|
|00004060| 2c 36 35 36 2c 22 59 22 | 2c 22 51 55 41 44 52 41 |,656,"Y"|,"QUADRA|
|00004070| 4e 54 20 2d 22 29 0d 19 | 0a 2d 51 35 3d a4 69 6e |NT -")..|.-Q5=.in|
|00004080| 70 75 74 4e 75 6d 62 65 | 72 28 36 32 30 2c 36 30 |putNumbe|r(620,60|
|00004090| 34 2c 36 38 30 2c 36 30 | 34 2c 22 57 22 2c 22 58 |4,680,60|4,"W","X|
|000040a0| 3a 22 29 0d 19 14 2d 51 | 34 3d a4 69 6e 70 75 74 |:")...-Q|4=.input|
|000040b0| 4e 75 6d 62 65 72 28 36 | 32 30 2c 35 35 32 2c 36 |Number(6|20,552,6|
|000040c0| 38 30 2c 35 35 32 2c 22 | 57 22 2c 22 59 3a 22 29 |80,552,"|W","Y:")|
|000040d0| 0d 19 1e 21 e7 20 51 34 | 3c 31 20 84 20 51 34 3e |...!. Q4|<1 . Q4>|
|000040e0| 38 20 84 20 51 35 3c 31 | 20 84 20 51 35 3e 38 20 |8 . Q5<1| . Q5>8 |
|000040f0| 8c 0d 19 28 37 20 20 20 | 20 20 3a 20 f2 74 65 78 |...(7 | : .tex|
|00004100| 74 28 33 30 38 2c 34 34 | 38 2c 22 52 22 2c 22 48 |t(308,44|8,"R","H|
|00004110| 59 50 45 52 50 52 4f 42 | 45 20 49 53 20 4e 4f 57 |YPERPROB|E IS NOW|
|00004120| 20 4f 4e 20 41 4e 22 29 | 0d 19 32 39 20 20 20 20 | ON AN")|..29 |
|00004130| 20 3a 20 f2 74 65 78 74 | 28 33 30 38 2c 33 39 36 | : .text|(308,396|
|00004140| 2c 22 52 22 2c 22 49 52 | 52 45 54 52 49 45 56 41 |,"R","IR|RETRIEVA|
|00004150| 42 4c 45 20 54 52 41 4a | 45 43 54 4f 52 59 2e 22 |BLE TRAJ|ECTORY."|
|00004160| 29 0d 19 3c 14 20 20 20 | 20 20 3a 20 51 34 3d 2d |)..<. | : Q4=-|
|00004170| 31 20 3a 20 e1 0d 19 46 | 05 cd 0d 19 50 2f f2 74 |1 : ...F|....P/.t|
|00004180| 65 78 74 28 33 30 38 2c | 34 34 38 2c 22 57 22 2c |ext(308,|448,"W",|
|00004190| 22 48 59 50 45 52 50 52 | 4f 42 45 20 4c 41 55 4e |"HYPERPR|OBE LAUN|
|000041a0| 43 48 45 44 20 54 4f 22 | 29 0d 19 5a 3b f2 74 65 |CHED TO"|)..Z;.te|
|000041b0| 78 74 28 33 30 38 2c 33 | 39 36 2c 22 57 22 2c 22 |xt(308,3|96,"W","|
|000041c0| 51 55 41 44 52 41 4e 54 | 20 22 2b c3 28 51 35 29 |QUADRANT| "+.(Q5)|
|000041d0| 2b 22 2e 22 2b c3 28 51 | 34 29 2b 22 20 2e 2e 2e |+"."+.(Q|4)+" ...|
|000041e0| 2e 2e 22 29 0d 19 64 0e | 5a 25 3d 56 25 2b b3 28 |..")..d.|Z%=V%+.(|
|000041f0| 39 29 0d 19 6e 05 e1 0d | 19 78 05 3a 0d 19 82 10 |9)..n...|.x.:....|
|00004200| dd 20 f2 73 75 70 65 72 | 4e 6f 76 61 0d 19 8c 19 |. .super|Nova....|
|00004210| f2 63 6c 65 61 72 28 31 | 29 20 3a 20 f2 63 6c 65 |.clear(1|) : .cle|
|00004220| 61 72 28 32 29 0d 19 96 | 37 f2 74 65 78 74 28 32 |ar(2)...|7.text(2|
|00004230| 34 2c 37 36 38 2c 22 52 | 22 2c 22 59 4f 55 20 48 |4,768,"R|","YOU H|
|00004240| 41 56 45 20 45 4e 54 45 | 52 45 44 20 41 20 53 55 |AVE ENTE|RED A SU|
|00004250| 50 45 52 4e 4f 56 41 20 | 49 4e 22 29 0d 19 a0 3a |PERNOVA |IN")...:|
|00004260| f2 74 65 78 74 28 32 34 | 2c 37 30 38 2c 22 52 22 |.text(24|,708,"R"|
|00004270| 2c 22 51 55 41 44 52 41 | 4e 54 20 22 2b c3 28 51 |,"QUADRA|NT "+.(Q|
|00004280| 32 29 2b 22 2e 22 2b c3 | 28 51 31 29 2b 22 20 2e |2)+"."+.|(Q1)+" .|
|00004290| 2e 2e 2e 2e 22 29 0d 19 | aa 0c f2 64 65 61 64 28 |....")..|...dead(|
|000042a0| 32 29 0d 19 b4 05 e1 0d | 19 be 05 3a 0d 19 c8 0b |2)......|...:....|
|000042b0| dd 20 f2 6e 6f 76 61 0d | 19 d2 1a f2 72 6e 64 20 |. .nova.|....rnd |
|000042c0| 3a 20 e7 20 5a 31 3c 3e | 51 31 20 8c 20 8d 64 66 |: . Z1<>|Q1 . .df|
|000042d0| 59 0d 19 dc 11 e7 20 5a | 32 3d 51 32 20 8c 8d 64 |Y..... Z|2=Q2 ..d|
|000042e0| 52 59 0d 19 e6 18 e7 20 | 47 28 5a 31 2c 5a 32 29 |RY..... |G(Z1,Z2)|
|000042f0| 3d 2d 31 20 8c 20 8d 64 | 52 59 0d 19 f0 1c 58 3d |=-1 . .d|RY....X=|
|00004300| 47 28 5a 31 2c 5a 32 29 | 2f 31 30 30 20 3a 20 58 |G(Z1,Z2)|/100 : X|
|00004310| 31 3d a8 28 58 29 0d 19 | fa 41 f2 70 72 69 6e 74 |1=.(X)..|.A.print|
|00004320| 65 72 28 32 2c 22 57 22 | 2c 22 43 4f 4d 4d 55 4e |er(2,"W"|,"COMMUN|
|00004330| 49 43 41 54 49 4f 4e 53 | 20 4f 46 46 49 43 45 52 |ICATIONS| OFFICER|
|00004340| 20 52 45 50 4f 52 54 49 | 4e 47 3a 22 29 20 3a 20 | REPORTI|NG:") : |
|00004350| 57 3d a6 28 38 30 29 0d | 1a 04 44 f2 70 72 69 6e |W=.(80).|..D.prin|
|00004360| 74 65 72 28 32 2c 22 57 | 22 2c 22 53 50 41 43 45 |ter(2,"W|","SPACE|
|00004370| 20 57 41 54 43 48 20 48 | 41 53 20 52 45 50 4f 52 | WATCH H|AS REPOR|
|00004380| 54 45 44 20 41 20 53 55 | 50 45 52 4e 4f 56 41 22 |TED A SU|PERNOVA"|
|00004390| 29 20 3a 20 57 3d a6 28 | 34 30 29 0d 1a 0e 3b f2 |) : W=.(|40)...;.|
|000043a0| 70 72 69 6e 74 65 72 28 | 32 2c 22 57 22 2c 22 49 |printer(|2,"W","I|
|000043b0| 4e 20 51 55 41 44 52 41 | 4e 54 20 22 2b c3 28 5a |N QUADRA|NT "+.(Z|
|000043c0| 32 29 2b 22 2e 22 2b c3 | 28 5a 31 29 2b 22 20 2e |2)+"."+.|(Z1)+" .|
|000043d0| 2e 2e 2e 2e 22 29 0d 1a | 18 45 57 3d a6 28 34 30 |....")..|.EW=.(40|
|000043e0| 29 20 3a 20 f2 70 72 69 | 6e 74 65 72 28 32 2c 22 |) : .pri|nter(2,"|
|000043f0| 52 22 2c 22 44 4f 20 4e | 4f 54 20 45 4e 54 45 52 |R","DO N|OT ENTER|
|00004400| 20 41 54 20 53 55 42 20 | 4c 49 47 48 54 20 53 50 | AT SUB |LIGHT SP|
|00004410| 45 45 44 20 2e 2e 2e 2e | 2e 22 29 0d 1a 22 12 e7 |EED ....|.").."..|
|00004420| 20 58 31 3c 3d 30 20 e5 | 20 8d 44 4a 5a 0d 1a 2c | X1<=0 .| .DJZ..,|
|00004430| 25 57 3d a6 28 34 30 29 | 20 3a 20 41 24 3d 22 22 |%W=.(40)| : A$=""|
|00004440| 20 3a 20 e7 20 58 31 3e | 31 20 8c 20 41 24 3d 22 | : . X1>|1 . A$="|
|00004450| 53 22 0d 1a 36 3a f2 70 | 72 69 6e 74 65 72 28 32 |S"..6:.p|rinter(2|
|00004460| 2c 22 59 22 2c c3 28 58 | 31 29 2b 22 20 4b 4c 49 |,"Y",.(X|1)+" KLI|
|00004470| 4e 47 4f 4e 22 2b 41 24 | 2b 22 20 44 45 53 54 52 |NGON"+A$|+" DESTR|
|00004480| 4f 59 45 44 20 2e 2e 2e | 2e 2e 22 29 0d 1a 40 25 |OYED ...|..")..@%|
|00004490| 4b 39 3d 4b 39 2d 58 31 | 20 3a 20 e7 20 4b 39 3c |K9=K9-X1| : . K9<|
|000044a0| 3d 30 20 8c 20 f2 64 65 | 61 64 28 34 29 20 3a 20 |=0 . .de|ad(4) : |
|000044b0| e1 0d 1a 4a 18 e7 20 31 | 30 2a 28 58 2d 58 31 29 |...J.. 1|0*(X-X1)|
|000044c0| 3c 31 20 8c 20 8d 44 68 | 5a 0d 1a 54 38 57 3d a6 |<1 . .Dh|Z..T8W=.|
|000044d0| 28 34 30 29 20 3a 20 f2 | 70 72 69 6e 74 65 72 28 |(40) : .|printer(|
|000044e0| 32 2c 22 59 22 2c 22 53 | 54 41 52 42 41 53 45 20 |2,"Y","S|TARBASE |
|000044f0| 44 45 53 54 52 4f 59 45 | 44 20 2e 2e 2e 2e 2e 22 |DESTROYE|D ....."|
|00004500| 29 0d 1a 5e 0b 42 39 3d | 42 39 2d 31 0d 1a 68 1d |)..^.B9=|B9-1..h.|
|00004510| 47 28 5a 31 2c 5a 32 29 | 3d 2d 31 20 3a 20 5a 28 |G(Z1,Z2)|=-1 : Z(|
|00004520| 5a 31 2c 5a 32 29 3d 2d | 31 0d 1a 72 17 57 3d a6 |Z1,Z2)=-|1..r.W=.|
|00004530| 28 34 30 29 20 3a 20 f2 | 63 6c 65 61 72 28 36 29 |(40) : .|clear(6)|
|00004540| 0d 1a 7c 05 e1 0d 1a 86 | 05 3a 0d 1a 90 12 dd 20 |..|.....|.:..... |
|00004550| f2 70 72 6f 62 65 52 65 | 74 75 72 6e 0d 1a 9a 1c |.probeRe|turn....|
|00004560| ea 20 41 2c 42 2c 43 2c | 58 2c 59 20 3a 20 e7 20 |. A,B,C,|X,Y : . |
|00004570| 51 34 3c 31 20 8c 20 e1 | 0d 1a a4 1b f2 63 6c 65 |Q4<1 . .|.....cle|
|00004580| 61 72 28 33 29 20 3a 20 | 4e 25 3d 47 28 51 34 2c |ar(3) : |N%=G(Q4,|
|00004590| 51 35 29 0d 1a ae 0c e7 | 20 4e 25 3c 30 20 8c 0d |Q5).....| N%<0 ..|
|000045a0| 1a b8 37 20 20 20 20 20 | 3a 20 f2 74 65 78 74 28 |..7 |: .text(|
|000045b0| 33 30 38 2c 37 30 38 2c | 22 52 22 2c 22 43 4f 4e |308,708,|"R","CON|
|000045c0| 54 41 43 54 20 57 49 54 | 48 20 48 59 50 45 52 50 |TACT WIT|H HYPERP|
|000045d0| 52 4f 42 45 22 29 0d 1a | c2 33 20 20 20 20 20 3a |ROBE")..|.3 :|
|000045e0| 20 f2 74 65 78 74 28 33 | 30 38 2c 36 35 36 2c 22 | .text(3|08,656,"|
|000045f0| 52 22 2c 22 48 41 53 20 | 42 45 45 4e 20 4c 4f 53 |R","HAS |BEEN LOS|
|00004600| 54 20 2e 2e 2e 2e 2e 22 | 29 0d 1a cc 14 20 20 20 |T ....."|).... |
|00004610| 20 20 3a 20 51 34 3d 2d | 31 20 3a 20 e1 0d 1a d6 | : Q4=-|1 : ....|
|00004620| 05 cd 0d 1a e0 30 f2 74 | 65 78 74 28 33 30 38 2c |.....0.t|ext(308,|
|00004630| 37 30 38 2c 22 57 22 2c | 22 48 59 50 45 52 50 52 |708,"W",|"HYPERPR|
|00004640| 4f 42 45 20 48 41 53 20 | 52 45 54 55 52 4e 45 44 |OBE HAS |RETURNED|
|00004650| 22 29 0d 1a ea 40 f2 74 | 65 78 74 28 33 30 38 2c |")...@.t|ext(308,|
|00004660| 36 35 36 2c 22 57 22 2c | 22 46 52 4f 4d 20 51 55 |656,"W",|"FROM QU|
|00004670| 41 44 52 41 4e 54 20 22 | 2b c3 28 51 35 29 2b 22 |ADRANT "|+.(Q5)+"|
|00004680| 2e 22 2b c3 28 51 34 29 | 2b 22 20 2e 2e 2e 2e 2e |."+.(Q4)|+" .....|
|00004690| 22 29 0d 1a f4 1b 59 3d | 35 36 30 20 3a 20 e3 20 |")....Y=|560 : . |
|000046a0| 41 3d 51 34 2d 31 20 b8 | 20 51 34 2b 31 0d 1a fe |A=Q4-1 .| Q4+1...|
|000046b0| 24 58 3d 33 30 38 20 3a | 20 4e 28 31 29 3d 30 20 |$X=308 :| N(1)=0 |
|000046c0| 3a 20 4e 28 32 29 3d 30 | 20 3a 20 4e 28 33 29 3d |: N(2)=0| : N(3)=|
|000046d0| 30 0d 1b 08 13 e3 20 42 | 3d 51 35 2d 31 20 b8 20 |0..... B|=Q5-1 . |
|000046e0| 51 35 2b 31 0d 1b 12 3e | e7 20 41 3e 30 20 80 20 |Q5+1...>|. A>0 . |
|000046f0| 41 3c 39 20 80 20 42 3e | 30 20 80 20 42 3c 39 20 |A<9 . B>|0 . B<9 |
|00004700| 8c 20 4e 28 42 2d 51 35 | 2b 32 29 3d 47 28 41 2c |. N(B-Q5|+2)=G(A,|
|00004710| 42 29 20 3a 20 5a 28 41 | 2c 42 29 3d 47 28 41 2c |B) : Z(A|,B)=G(A,|
|00004720| 42 29 0d 1b 1c 05 ed 0d | 1b 26 0d e3 20 43 3d 31 |B)......|.&.. C=1|
|00004730| 20 b8 20 33 0d 1b 30 1a | e6 20 38 20 3a 20 c8 93 | . 3..0.|. 8 : ..|
|00004740| 20 c8 90 20 58 2c 59 2c | 32 32 30 2c 38 34 0d 1b | .. X,Y,|220,84..|
|00004750| 3a 1e e6 20 30 20 3a 20 | c8 93 20 c8 90 20 58 2b |:.. 0 : |.. .. X+|
|00004760| 34 2c 59 2b 34 2c 32 31 | 32 2c 37 36 0d 1b 44 33 |4,Y+4,21|2,76..D3|
|00004770| e7 20 4e 28 43 29 3d 30 | 20 20 8c 20 f2 74 65 78 |. N(C)=0| . .tex|
|00004780| 74 28 58 2b 32 36 2c 59 | 2b 31 32 2c 22 57 22 2c |t(X+26,Y|+12,"W",|
|00004790| 22 20 20 20 22 29 20 3a | 20 e5 20 8d 74 40 5b 0d |" ") :| . .t@[.|
|000047a0| 1b 4e 35 e7 20 4e 28 43 | 29 3d 2d 31 20 8c 20 f2 |.N5. N(C|)=-1 . .|
|000047b0| 74 65 78 74 28 58 2b 33 | 32 2c 59 2b 31 32 2c 22 |text(X+3|2,Y+12,"|
|000047c0| 59 22 2c 22 2a 20 2a 20 | 2a 22 29 20 3a 20 e5 20 |Y","* * |*") : . |
|000047d0| 8d 74 40 5b 0d 1b 58 17 | 71 24 3d c2 c3 28 4e 28 |.t@[..X.|q$=..(N(|
|000047e0| 43 29 2b 31 30 30 30 29 | 2c 33 29 0d 1b 62 28 6b |C)+1000)|,3)..b(k|
|000047f0| 24 3d c0 71 24 2c 31 29 | 20 20 3a 20 f2 74 65 78 |$=.q$,1)| : .tex|
|00004800| 74 28 58 2b 33 32 2c 59 | 2b 32 34 2c 22 52 22 2c |t(X+32,Y|+24,"R",|
|00004810| 6b 24 29 0d 1b 6c 29 73 | 24 3d c1 71 24 2c 32 2c |k$)..l)s|$=.q$,2,|
|00004820| 31 29 20 3a 20 f2 74 65 | 78 74 28 58 2b 39 36 2c |1) : .te|xt(X+96,|
|00004830| 59 2b 32 34 2c 22 42 22 | 2c 73 24 29 0d 1b 76 28 |Y+24,"B"|,s$)..v(|
|00004840| 70 24 3d c2 71 24 2c 31 | 29 20 3a 20 f2 74 65 78 |p$=.q$,1|) : .tex|
|00004850| 74 28 58 2b 31 36 30 2c | 59 2b 32 34 2c 22 59 22 |t(X+160,|Y+24,"Y"|
|00004860| 2c 70 24 29 0d 1b 80 0e | 58 2b 3d 32 33 32 20 3a |,p$)....|X+=232 :|
|00004870| 20 ed 0d 1b 8a 0e 59 2d | 3d 39 36 20 20 3a 20 ed | .....Y-|=96 : .|
|00004880| 0d 1b 94 08 51 34 3d 30 | 0d 1b 9e 05 e1 0d 1b a8 |....Q4=0|........|
|00004890| 05 3a 0d 1b b2 12 dd 20 | f2 73 63 61 6e 6e 65 72 |.:..... |.scanner|
|000048a0| 49 6e 66 6f 0d 1b bc 1c | e7 20 4b 33 3c 31 20 8c |Info....|. K3<1 .|
|000048b0| 20 f2 6e 6f 4b 6c 69 6e | 67 6f 6e 73 20 3a 20 e1 | .noKlin|gons : .|
|000048c0| 0d 1b c6 0e e7 20 44 28 | 39 29 3c 30 20 8c 0d 1b |..... D(|9)<0 ...|
|000048d0| d0 2d 20 20 20 20 20 3a | 20 f2 66 6f 6e 74 28 33 |.- :| .font(3|
|000048e0| 32 34 2c 32 32 38 2c 31 | 2c 22 43 4f 4d 42 41 54 |24,228,1|,"COMBAT|
|000048f0| 20 43 4f 4d 50 55 54 45 | 52 22 29 0d 1b da 2b 20 | COMPUTE|R")...+ |
|00004900| 20 20 20 20 3a 20 f2 66 | 6f 6e 74 28 33 32 34 2c | : .f|ont(324,|
|00004910| 31 39 32 2c 31 2c 22 49 | 53 20 44 4f 57 4e 20 2e |192,1,"I|S DOWN .|
|00004920| 2e 2e 2e 2e 22 29 0d 1b | e4 0c 20 20 20 20 20 3a |....")..|.. :|
|00004930| 20 e1 0d 1b ee 05 cd 0d | 1b f8 0d f2 63 6c 65 61 | .......|....clea|
|00004940| 72 28 33 29 0d 1c 02 2e | f2 74 65 78 74 28 33 30 |r(3)....|.text(30|
|00004950| 38 2c 37 30 38 2c 22 52 | 22 2c 22 4b 4c 49 4e 47 |8,708,"R|","KLING|
|00004960| 4f 4e 20 46 4f 52 43 45 | 20 53 54 41 54 55 53 3a |ON FORCE| STATUS:|
|00004970| 22 29 0d 1c 0c 41 f2 74 | 65 78 74 28 33 30 38 2c |")...A.t|ext(308,|
|00004980| 36 35 36 2c 22 59 22 2c | 22 53 45 43 54 4f 52 3a |656,"Y",|"SECTOR:|
|00004990| 22 29 20 3a 20 f2 74 65 | 78 74 28 36 30 38 2c 36 |") : .te|xt(608,6|
|000049a0| 35 36 2c 22 59 22 2c 22 | 53 54 52 45 4e 47 54 48 |56,"Y","|STRENGTH|
|000049b0| 3a 22 29 0d 1c 16 13 50 | 25 3d 33 30 38 20 3a 20 |:")....P|%=308 : |
|000049c0| 51 25 3d 36 30 34 0d 1c | 20 0f e3 20 49 25 3d 31 |Q%=604..| .. I%=1|
|000049d0| 20 b8 20 4b 33 0d 1c 2a | 2e f2 74 65 78 74 28 50 | . K3..*|..text(P|
|000049e0| 25 2c 51 25 2c 22 57 22 | 2c c3 28 4b 28 49 25 2c |%,Q%,"W"|,.(K(I%,|
|000049f0| 32 29 29 2b 22 2e 22 2b | c3 28 4b 28 49 25 2c 31 |2))+"."+|.(K(I%,1|
|00004a00| 29 29 29 0d 1c 34 2d f2 | 74 65 78 74 28 50 25 2b |)))..4-.|text(P%+|
|00004a10| 33 30 30 2c 51 25 2c 22 | 57 22 2c c3 28 4b 28 49 |300,Q%,"|W",.(K(I|
|00004a20| 25 2c 33 29 29 2b 22 20 | 55 4e 49 54 53 2e 22 29 |%,3))+" |UNITS.")|
|00004a30| 0d 1c 3e 0b 51 25 2d 3d | 31 32 30 0d 1c 48 05 ed |..>.Q%-=|120..H..|
|00004a40| 0d 1c 52 05 e1 0d 1c 5c | 05 3a 0d 1c 66 0d dd 20 |..R....\|.:..f.. |
|00004a50| f2 72 65 70 6f 72 74 0d | 1c 70 15 ea 20 49 25 2c |.report.|.p.. I%,|
|00004a60| 54 2c 57 2c 41 24 20 3a | 20 54 3d 30 0d 1c 7a 0f |T,W,A$ :| T=0..z.|
|00004a70| e3 20 49 25 3d 31 20 b8 | 20 31 32 0d 1c 84 13 e7 |. I%=1 .| 12.....|
|00004a80| 20 44 28 49 25 29 3c 30 | 20 8c 20 54 3d 31 0d 1c | D(I%)<0| . T=1..|
|00004a90| 8e 05 ed 0d 1c 98 0b e7 | 20 54 3d 31 20 8c 0d 1c |........| T=1 ...|
|00004aa0| a2 42 20 20 20 20 20 3a | 20 f2 63 6c 65 61 72 28 |.B :| .clear(|
|00004ab0| 36 29 20 3a 20 f2 70 72 | 69 6e 74 65 72 28 32 2c |6) : .pr|inter(2,|
|00004ac0| 22 57 22 2c 22 44 41 4d | 41 47 45 20 43 4f 4e 54 |"W","DAM|AGE CONT|
|00004ad0| 52 4f 4c 20 52 45 50 4f | 52 54 49 4e 47 3a 22 29 |ROL REPO|RTING:")|
|00004ae0| 0d 1c ac 12 20 20 20 20 | 20 3a 20 57 3d a6 28 32 |.... | : W=.(2|
|00004af0| 30 29 0d 1c b6 05 cd 0d | 1c c0 0f e3 20 49 25 3d |0)......|.... I%=|
|00004b00| 31 20 b8 20 31 32 0d 1c | ca 18 e7 20 49 25 3d 37 |1 . 12..|... I%=7|
|00004b10| 20 80 20 44 49 4c 25 20 | 8c 20 8d 54 50 5d 0d 1c | . DIL% |. .TP]..|
|00004b20| d4 18 e7 20 49 25 3d 36 | 20 80 20 4e 45 55 25 20 |... I%=6| . NEU% |
|00004b30| 8c 20 8d 54 50 5d 0d 1c | de 15 e7 20 44 28 49 25 |. .TP]..|... D(I%|
|00004b40| 29 3e 3d 30 20 8c 20 8d | 54 50 5d 0d 1c e8 1e 41 |)>=0 . .|TP]....A|
|00004b50| 24 3d 22 20 42 45 49 4e | 47 20 52 45 50 41 49 52 |$=" BEIN|G REPAIR|
|00004b60| 45 44 20 2e 2e 2e 2e 2e | 22 0d 1c f2 11 44 28 49 |ED .....|"....D(I|
|00004b70| 25 29 3d 44 28 49 25 29 | 2b 31 0d 1c fc 27 e7 20 |%)=D(I%)|+1...'. |
|00004b80| 44 28 49 25 29 3e 3d 30 | 20 8c 20 41 24 3d 22 20 |D(I%)>=0| . A$=" |
|00004b90| 4e 4f 57 20 4f 50 45 52 | 41 54 49 4f 4e 41 4c 2e |NOW OPER|ATIONAL.|
|00004ba0| 22 0d 1d 06 27 f2 70 72 | 69 6e 74 65 72 28 32 2c |"...'.pr|inter(2,|
|00004bb0| 22 57 22 2c 44 24 28 49 | 25 29 2b 41 24 29 20 3a |"W",D$(I|%)+A$) :|
|00004bc0| 20 57 3d a6 28 32 30 29 | 0d 1d 10 11 ed 20 3a 20 | W=.(20)|..... : |
|00004bd0| f2 63 6c 65 61 72 28 36 | 29 0d 1d 1a 05 e1 0d 1d |.clear(6|).......|
|00004be0| 24 05 3a 0d 1d 2e 0b dd | 20 f2 6d 6f 76 65 0d 1d |$.:.....| .move..|
|00004bf0| 38 1b 5a 31 3d 4b 28 49 | 25 2c 31 29 20 3a 20 5a |8.Z1=K(I|%,1) : Z|
|00004c00| 32 3d 4b 28 49 25 2c 32 | 29 0d 1d 42 17 e7 20 53 |2=K(I%,2|)..B.. S|
|00004c10| 31 2d 5a 31 3e 30 20 8c | 20 5a 31 3d 5a 31 2b 31 |1-Z1>0 .| Z1=Z1+1|
|00004c20| 0d 1d 4c 17 e7 20 53 32 | 2d 5a 32 3e 30 20 8c 20 |..L.. S2|-Z2>0 . |
|00004c30| 5a 32 3d 5a 32 2b 31 0d | 1d 56 17 e7 20 53 31 2d |Z2=Z2+1.|.V.. S1-|
|00004c40| 5a 31 3c 30 20 8c 20 5a | 31 3d 5a 31 2d 31 0d 1d |Z1<0 . Z|1=Z1-1..|
|00004c50| 60 17 e7 20 53 32 2d 5a | 32 3c 30 20 8c 20 5a 32 |`.. S2-Z|2<0 . Z2|
|00004c60| 3d 5a 32 2d 31 0d 1d 6a | 1f 41 24 3d 22 22 20 3a |=Z2-1..j|.A$="" :|
|00004c70| 20 f2 63 68 65 63 6b 20 | 3a 20 e7 20 5a 33 3d 30 | .check |: . Z3=0|
|00004c80| 20 8c 20 e1 0d 1d 74 1a | 51 24 28 4b 28 49 25 2c | . ...t.|Q$(K(I%,|
|00004c90| 31 29 2c 4b 28 49 25 2c | 32 29 29 3d 22 22 0d 1d |1),K(I%,|2))=""..|
|00004ca0| 7e 31 4b 28 49 25 2c 31 | 29 3d 5a 31 20 3a 20 4b |~1K(I%,1|)=Z1 : K|
|00004cb0| 28 49 25 2c 32 29 3d 5a | 32 20 3a 20 51 24 28 5a |(I%,2)=Z|2 : Q$(Z|
|00004cc0| 31 2c 5a 32 29 3d 22 6b | 6c 69 6e 67 6f 6e 22 0d |1,Z2)="k|lingon".|
|00004cd0| 1d 88 05 e1 0d 1d 92 05 | 3a 0d 1d 9c 0b dd 20 a4 |........|:..... .|
|00004ce0| 44 28 44 29 0d 1d a6 25 | 3d b6 28 28 4b 28 49 25 |D(D)...%|=.((K(I%|
|00004cf0| 2c 31 29 2d 53 31 29 5e | 32 2b 28 4b 28 49 25 2c |,1)-S1)^|2+(K(I%,|
|00004d00| 32 29 2d 53 32 29 5e 32 | 29 0d 1d b0 05 3a 0d 1d |2)-S2)^2|)....:..|
|00004d10| ba 0e dd 20 f2 6d 79 73 | 74 65 72 79 0d 1d c4 24 |... .mys|tery...$|
|00004d20| 45 39 3d b3 28 31 29 20 | 3a 20 e7 20 45 39 3c 2e |E9=.(1) |: . E9<.|
|00004d30| 32 20 84 20 45 39 3e 2e | 36 20 8c 20 8d 64 44 5d |2 . E9>.|6 . .dD]|
|00004d40| 0d 1d ce 18 45 3d a8 28 | 45 2a 45 39 2b 31 29 20 |....E=.(|E*E9+1) |
|00004d50| 3a 20 4d 59 53 25 3d b9 | 0d 1d d8 3a f2 70 72 69 |: MYS%=.|...:.pri|
|00004d60| 6e 74 65 72 28 32 2c 22 | 57 22 2c 22 53 43 49 45 |nter(2,"|W","SCIE|
|00004d70| 4e 43 45 20 4f 46 46 49 | 43 45 52 20 52 45 50 4f |NCE OFFI|CER REPO|
|00004d80| 52 54 49 4e 47 3a 22 29 | 20 3a 20 57 3d a6 28 34 |RTING:")| : W=.(4|
|00004d90| 30 29 0d 1d e2 3e f2 70 | 72 69 6e 74 65 72 28 32 |0)...>.p|rinter(2|
|00004da0| 2c 22 59 22 2c 22 41 20 | 4d 59 53 54 45 52 59 20 |,"Y","A |MYSTERY |
|00004db0| 50 4f 57 45 52 20 44 52 | 41 49 4e 20 48 41 53 20 |POWER DR|AIN HAS |
|00004dc0| 4f 43 43 55 52 52 45 44 | 20 2e 2e 2e 2e 2e 22 29 |OCCURRED| .....")|
|00004dd0| 0d 1d ec 1a f2 75 70 64 | 61 74 65 42 61 6e 6b 73 |.....upd|ateBanks|
|00004de0| 20 3a 20 57 3d a6 28 34 | 30 29 0d 1d f6 42 f2 70 | : W=.(4|0)...B.p|
|00004df0| 72 69 6e 74 65 72 28 32 | 2c 22 52 22 2c 22 4f 4e |rinter(2|,"R","ON|
|00004e00| 4c 59 20 22 2b c3 28 45 | 29 2b 22 20 55 4e 49 54 |LY "+.(E|)+" UNIT|
|00004e10| 53 20 4f 46 20 50 4f 57 | 45 52 20 52 45 4d 41 49 |S OF POW|ER REMAI|
|00004e20| 4e 49 4e 47 20 2e 2e 2e | 2e 2e 22 29 0d 1e 00 05 |NING ...|..")....|
|00004e30| e1 0d 1e 0a 05 3a 0d 1e | 14 10 dd 20 f2 64 69 6c |.....:..|... .dil|
|00004e40| 69 74 68 69 75 6d 0d 1e | 1e 36 f2 70 72 69 6e 74 |ithium..|.6.print|
|00004e50| 65 72 28 32 2c 22 57 22 | 2c 22 45 4e 47 49 4e 45 |er(2,"W"|,"ENGINE|
|00004e60| 45 52 49 4e 47 20 52 45 | 50 4f 52 54 49 4e 47 3a |ERING RE|PORTING:|
|00004e70| 22 29 20 3a 20 57 3d a6 | 28 34 30 29 0d 1e 28 41 |") : W=.|(40)..(A|
|00004e80| f2 70 72 69 6e 74 65 72 | 28 32 2c 22 59 22 2c 22 |.printer|(2,"Y","|
|00004e90| 44 49 4c 49 54 48 49 55 | 4d 20 43 52 59 53 54 41 |DILITHIU|M CRYSTA|
|00004ea0| 4c 53 20 53 54 4f 4c 45 | 4e 20 42 59 20 49 4e 54 |LS STOLE|N BY INT|
|00004eb0| 52 55 44 45 52 20 2e 2e | 2e 2e 2e 22 29 0d 1e 32 |RUDER ..|...")..2|
|00004ec0| 20 44 28 37 29 3d 2d 31 | 45 32 20 3a 20 44 49 4c | D(7)=-1|E2 : DIL|
|00004ed0| 25 3d b9 20 3a 20 57 3d | a6 28 34 30 29 0d 1e 3c |%=. : W=|.(40)..<|
|00004ee0| 3d f2 70 72 69 6e 74 65 | 72 28 32 2c 22 52 22 2c |=.printe|r(2,"R",|
|00004ef0| 22 4e 4f 20 50 4f 57 45 | 52 20 46 4f 52 20 57 41 |"NO POWE|R FOR WA|
|00004f00| 52 50 20 44 52 49 56 45 | 20 2e 2e 2e 2e 2e 22 29 |RP DRIVE| .....")|
|00004f10| 20 3a 20 57 3d a6 28 34 | 30 29 0d 1e 46 3a f2 70 | : W=.(4|0)..F:.p|
|00004f20| 72 69 6e 74 65 72 28 32 | 2c 22 52 22 2c 22 52 45 |rinter(2|,"R","RE|
|00004f30| 54 55 52 4e 20 54 4f 20 | 53 54 41 52 42 41 53 45 |TURN TO |STARBASE|
|00004f40| 20 46 4f 52 20 52 45 50 | 41 49 52 53 20 2e 2e 2e | FOR REP|AIRS ...|
|00004f50| 2e 2e 22 29 0d 1e 50 05 | e1 0d 1e 5a 05 3a 0d 1e |..")..P.|...Z.:..|
|00004f60| 64 0e dd 20 f2 6e 65 75 | 74 72 6f 6e 0d 1e 6e 3a |d.. .neu|tron..n:|
|00004f70| f2 70 72 69 6e 74 65 72 | 28 32 2c 22 57 22 2c 22 |.printer|(2,"W","|
|00004f80| 53 43 49 45 4e 43 45 20 | 4f 46 46 49 43 45 52 20 |SCIENCE |OFFICER |
|00004f90| 52 45 50 4f 52 54 49 4e | 47 3a 22 29 20 3a 20 57 |REPORTIN|G:") : W|
|00004fa0| 3d a6 28 34 30 29 0d 1e | 78 40 f2 70 72 69 6e 74 |=.(40)..|x@.print|
|00004fb0| 65 72 28 32 2c 22 59 22 | 2c 22 43 4f 4c 4c 49 53 |er(2,"Y"|,"COLLIS|
|00004fc0| 49 4f 4e 20 57 49 54 48 | 20 41 20 4e 45 55 54 52 |ION WITH| A NEUTR|
|00004fd0| 4f 4e 20 4d 49 4e 45 20 | 48 41 53 20 4f 43 43 55 |ON MINE |HAS OCCU|
|00004fe0| 52 52 45 44 22 29 0d 1e | 82 20 57 3d a6 28 34 30 |RRED")..|. W=.(40|
|00004ff0| 29 20 3a 20 44 28 36 29 | 3d 2d 31 45 32 20 3a 20 |) : D(6)|=-1E2 : |
|00005000| 4e 45 55 25 3d b9 0d 1e | 8c 43 f2 70 72 69 6e 74 |NEU%=...|.C.print|
|00005010| 65 72 28 32 2c 22 52 22 | 2c 22 53 48 49 45 4c 44 |er(2,"R"|,"SHIELD|
|00005020| 53 20 44 49 53 41 42 4c | 45 44 20 2d 20 4e 4f 20 |S DISABL|ED - NO |
|00005030| 43 4f 4e 54 52 4f 4c 20 | 41 56 41 49 4c 41 42 4c |CONTROL |AVAILABL|
|00005040| 45 20 2e 2e 2e 2e 2e 22 | 29 0d 1e 96 44 57 3d a6 |E ....."|)...DW=.|
|00005050| 28 34 30 29 20 3a 20 f2 | 70 72 69 6e 74 65 72 28 |(40) : .|printer(|
|00005060| 32 2c 22 52 22 2c 22 52 | 45 54 55 52 4e 20 54 4f |2,"R","R|ETURN TO|
|00005070| 20 53 54 41 52 42 41 53 | 45 20 46 4f 52 20 52 45 | STARBAS|E FOR RE|
|00005080| 50 41 49 52 53 20 2e 2e | 2e 2e 2e 22 29 0d 1e a0 |PAIRS ..|...")...|
|00005090| 05 e1 0d 1e aa 05 3a 0d | 1e b4 08 dd f2 58 59 0d |......:.|.....XY.|
|000050a0| 1e be 2d 58 31 3d 43 28 | 43 31 2c 31 29 2b 28 43 |..-X1=C(|C1,1)+(C|
|000050b0| 28 43 31 2b 31 2c 31 29 | 2d 43 28 43 31 2c 31 29 |(C1+1,1)|-C(C1,1)|
|000050c0| 29 2a 28 43 31 2d a8 28 | 43 31 29 29 0d 1e c8 2d |)*(C1-.(|C1))...-|
|000050d0| 58 32 3d 43 28 43 31 2c | 32 29 2b 28 43 28 43 31 |X2=C(C1,|2)+(C(C1|
|000050e0| 2b 31 2c 32 29 2d 43 28 | 43 31 2c 32 29 29 2a 28 |+1,2)-C(|C1,2))*(|
|000050f0| 43 31 2d a8 28 43 31 29 | 29 0d 1e d2 05 e1 0d 1e |C1-.(C1)|).......|
|00005100| dc 05 3a 0d 1e e6 0e dd | 20 f2 70 6f 69 6e 74 65 |..:.....| .pointe|
|00005110| 72 0d 1e f0 0e de 20 44 | 61 74 61 20 34 30 30 0d |r..... D|ata 400.|
|00005120| 1e fa 1e ff 20 22 4c 4f | 41 44 20 50 6f 69 6e 74 |.... "LO|AD Point|
|00005130| 65 72 20 22 2b c3 7e 28 | 44 61 74 61 29 0d 1f 04 |er "+.~(|Data)...|
|00005140| 22 44 61 74 61 3f 26 30 | 31 3d 32 20 3a 20 44 61 |"Data?&0|1=2 : Da|
|00005150| 74 61 21 26 30 36 3d 44 | 61 74 61 2b 26 30 41 0d |ta!&06=D|ata+&0A.|
|00005160| 1f 0e 18 c8 99 20 22 4f | 53 5f 57 6f 72 64 22 2c |..... "O|S_Word",|
|00005170| 32 31 2c 44 61 74 61 0d | 1f 18 0c 2a 50 4f 49 4e |21,Data.|...*POIN|
|00005180| 54 45 52 0d 1f 22 18 c8 | 97 20 c8 93 20 30 2c 31 |TER.."..|. .. 0,1|
|00005190| 32 30 2c 31 32 38 30 2c | 32 30 30 0d 1f 2c 14 c8 |20,1280,|200..,..|
|000051a0| 97 20 fb 20 31 2c 32 34 | 30 2c 31 39 32 2c 30 0d |. . 1,24|0,192,0.|
|000051b0| 1f 36 12 c8 97 20 fb 20 | 33 2c 30 2c 30 2c 32 32 |.6... . |3,0,0,22|
|000051c0| 34 0d 1f 40 0a c8 97 20 | ee 20 32 0d 1f 4a 05 e1 |4..@... |. 2..J..|
|000051d0| 0d 1f 54 05 3a 0d 1f 5e | 0c dd 20 f2 73 65 74 75 |..T.:..^|.. .setu|
|000051e0| 70 0d 1f 68 3b de 20 47 | 28 39 2c 39 29 2c 5a 28 |p..h;. G|(9,9),Z(|
|000051f0| 39 2c 39 29 2c 43 28 39 | 2c 32 29 2c 4b 28 33 2c |9,9),C(9|,2),K(3,|
|00005200| 33 29 2c 4e 28 33 29 2c | 44 28 31 32 29 2c 51 24 |3),N(3),|D(12),Q$|
|00005210| 28 39 2c 39 29 2c 44 24 | 28 31 32 29 0d 1f 72 25 |(9,9),D$|(12)..r%|
|00005220| 43 28 31 2c 31 29 3d 2d | 31 20 3a 20 43 28 32 2c |C(1,1)=-|1 : C(2,|
|00005230| 31 29 3d 2d 31 20 3a 20 | 43 28 37 2c 32 29 3d 2d |1)=-1 : |C(7,2)=-|
|00005240| 31 0d 1f 7c 25 43 28 38 | 2c 31 29 3d 2d 31 20 3a |1..|%C(8|,1)=-1 :|
|00005250| 20 43 28 38 2c 32 29 3d | 2d 31 20 3a 20 43 28 36 | C(8,2)=|-1 : C(6|
|00005260| 2c 32 29 3d 2d 31 0d 1f | 86 24 43 28 39 2c 31 29 |,2)=-1..|.$C(9,1)|
|00005270| 3d 2d 31 20 3a 20 43 28 | 31 2c 32 29 3d 30 20 20 |=-1 : C(|1,2)=0 |
|00005280| 3a 20 43 28 33 2c 31 29 | 3d 30 0d 1f 90 24 43 28 |: C(3,1)|=0...$C(|
|00005290| 35 2c 32 29 3d 30 20 20 | 3a 20 43 28 37 2c 31 29 |5,2)=0 |: C(7,1)|
|000052a0| 3d 30 20 20 3a 20 43 28 | 39 2c 32 29 3d 30 0d 1f |=0 : C(|9,2)=0..|
|000052b0| 9a 24 43 28 32 2c 32 29 | 3d 31 20 20 3a 20 43 28 |.$C(2,2)|=1 : C(|
|000052c0| 33 2c 32 29 3d 31 20 20 | 3a 20 43 28 34 2c 31 29 |3,2)=1 |: C(4,1)|
|000052d0| 3d 31 0d 1f a4 24 43 28 | 34 2c 32 29 3d 31 20 20 |=1...$C(|4,2)=1 |
|000052e0| 3a 20 43 28 35 2c 31 29 | 3d 31 20 20 3a 20 43 28 |: C(5,1)|=1 : C(|
|000052f0| 36 2c 31 29 3d 31 0d 1f | ae 27 f7 20 8d 74 78 5f |6,1)=1..|.'. .tx_|
|00005300| 20 3a 20 e3 20 49 25 3d | 31 20 b8 20 31 32 20 3a | : . I%=|1 . 12 :|
|00005310| 20 f3 20 44 24 28 49 25 | 29 20 3a 20 ed 0d 1f b8 | . D$(I%|) : ....|
|00005320| 40 dc 20 53 48 4f 52 54 | 20 52 41 4e 47 45 20 53 |@. SHORT| RANGE S|
|00005330| 45 4e 53 4f 52 53 2c 4c | 4f 4e 47 20 52 41 4e 47 |ENSORS,L|ONG RANG|
|00005340| 45 20 53 45 4e 53 4f 52 | 53 2c 48 59 50 45 52 50 |E SENSOR|S,HYPERP|
|00005350| 52 4f 42 45 20 4c 41 55 | 4e 43 48 45 52 0d 1f c2 |ROBE LAU|NCHER...|
|00005360| 33 dc 20 50 48 41 53 45 | 52 20 43 4f 4e 54 52 4f |3. PHASE|R CONTRO|
|00005370| 4c 2c 50 48 4f 54 4f 4e | 20 54 55 42 45 53 2c 44 |L,PHOTON| TUBES,D|
|00005380| 45 46 4c 45 43 54 4f 52 | 20 43 4f 4e 54 52 4f 4c |EFLECTOR| CONTROL|
|00005390| 0d 1f cc 31 dc 20 57 41 | 52 50 20 45 4e 47 49 4e |...1. WA|RP ENGIN|
|000053a0| 45 53 2c 44 41 4d 41 47 | 45 20 43 4f 4e 54 52 4f |ES,DAMAG|E CONTRO|
|000053b0| 4c 2c 43 4f 4d 42 41 54 | 20 43 4f 4d 50 55 54 45 |L,COMBAT| COMPUTE|
|000053c0| 52 0d 1f d6 37 dc 20 4e | 41 56 49 47 41 54 49 4f |R...7. N|AVIGATIO|
|000053d0| 4e 20 43 4f 4d 50 55 54 | 45 52 2c 43 45 4e 54 52 |N COMPUT|ER,CENTR|
|000053e0| 41 4c 20 43 4f 4d 50 55 | 54 45 52 2c 4c 49 46 45 |AL COMPU|TER,LIFE|
|000053f0| 20 53 55 50 50 4f 52 54 | 0d 1f e0 05 e1 0d 1f ea | SUPPORT|........|
|00005400| 05 3a 0d 1f f4 0b dd 20 | f2 69 6e 69 74 0d 1f fe |.:..... |.init...|
|00005410| 2f 54 3d 28 a8 28 28 b3 | 28 31 29 2b 33 29 2a 31 |/T=(.((.|(1)+3)*1|
|00005420| 45 34 29 29 2f 31 30 20 | 3a 20 54 30 3d 54 20 3a |E4))/10 |: T0=T :|
|00005430| 20 4b 39 3d 30 20 3a 20 | 42 39 3d 30 0d 20 08 2c | K9=0 : |B9=0. .,|
|00005440| 54 39 3d 32 35 2b a8 28 | b3 28 31 30 29 29 20 3a |T9=25+.(|.(10)) :|
|00005450| 20 54 38 3d 54 39 2b 54 | 20 3a 20 51 34 3d 30 20 | T8=T9+T| : Q4=0 |
|00005460| 3a 20 4d 41 50 25 3d 30 | 0d 20 12 39 53 39 3d 32 |: MAP%=0|. .9S9=2|
|00005470| 30 30 20 3a 20 45 30 3d | 34 30 30 30 20 3a 20 50 |00 : E0=|4000 : P|
|00005480| 30 3d 31 30 20 3a 20 50 | 3d 50 30 20 3a 20 45 3d |0=10 : P|=P0 : E=|
|00005490| 45 30 20 3a 20 45 31 3d | 45 2b 31 20 3a 20 53 3d |E0 : E1=|E+1 : S=|
|000054a0| 30 0d 20 1c 20 44 28 29 | 3d 34 20 3a 20 47 28 29 |0. . D()|=4 : G()|
|000054b0| 3d 30 20 3a 20 5a 28 29 | 3d 30 20 3a 20 44 25 3d |=0 : Z()|=0 : D%=|
|000054c0| 30 0d 20 26 1b e3 20 49 | 25 3d 31 20 b8 20 38 20 |0. &.. I|%=1 . 8 |
|000054d0| 3a 20 e3 20 4a 25 3d 31 | 20 b8 20 38 0d 20 30 12 |: . J%=1| . 8. 0.|
|000054e0| 52 31 3d b3 28 31 29 20 | 3a 20 4b 33 3d 30 0d 20 |R1=.(1) |: K3=0. |
|000054f0| 3a 12 e7 20 52 31 3e 2e | 38 20 8c 20 4b 33 3d 31 |:.. R1>.|8 . K3=1|
|00005500| 0d 20 44 13 e7 20 52 31 | 3e 2e 39 35 20 8c 20 4b |. D.. R1|>.95 . K|
|00005510| 33 3d 32 0d 20 4e 13 e7 | 20 52 31 3e 2e 39 38 20 |3=2. N..| R1>.98 |
|00005520| 8c 20 4b 33 3d 33 0d 20 | 58 2f 4b 39 3d 4b 39 2b |. K3=3. |X/K9=K9+|
|00005530| 4b 33 20 3a 20 52 31 3d | b3 28 31 29 20 3a 20 42 |K3 : R1=|.(1) : B|
|00005540| 33 3d 30 20 3a 20 e7 20 | 52 31 3e 2e 39 36 20 8c |3=0 : . |R1>.96 .|
|00005550| 20 42 33 3d 31 0d 20 62 | 31 42 39 3d 42 39 2b 42 | B3=1. b|1B9=B9+B|
|00005560| 33 20 3a 20 53 33 3d b3 | 28 38 29 20 3a 20 47 28 |3 : S3=.|(8) : G(|
|00005570| 49 25 2c 4a 25 29 3d 4b | 33 2a 31 30 30 2b 42 33 |I%,J%)=K|3*100+B3|
|00005580| 2a 31 30 2b 53 33 0d 20 | 6c 09 ed 20 3a 20 ed 0d |*10+S3. |l.. : ..|
|00005590| 20 76 25 e7 20 42 39 3c | 3d 30 20 8c 20 47 28 36 | v%. B9<|=0 . G(6|
|000055a0| 2c 33 29 3d 47 28 36 2c | 33 29 2b 31 30 20 3a 20 |,3)=G(6,|3)+10 : |
|000055b0| 42 39 3d 31 0d 20 80 29 | 51 31 3d b3 28 38 29 20 |B9=1. .)|Q1=.(8) |
|000055c0| 3a 20 51 32 3d b3 28 38 | 29 20 3a 20 53 31 3d b3 |: Q2=.(8|) : S1=.|
|000055d0| 28 38 29 20 3a 20 53 32 | 3d b3 28 38 29 0d 20 8a |(8) : S2|=.(8). .|
|000055e0| 2d 44 65 61 64 25 3d a3 | 20 3a 20 4d 59 53 25 3d |-Dead%=.| : MYS%=|
|000055f0| a3 20 3a 20 44 49 4c 25 | 3d a3 20 3a 20 4e 45 55 |. : DIL%|=. : NEU|
|00005600| 25 3d a3 20 3a 20 56 25 | 3d 30 0d 20 94 05 e1 0d |%=. : V%|=0. ....|
|00005610| 20 9e 05 3a 0d 20 a8 17 | dd 20 f2 70 72 69 6e 74 | ..:. ..|. .print|
|00005620| 65 72 28 61 2c 63 24 2c | 61 24 29 0d 20 b2 15 ea |er(a,c$,|a$). ...|
|00005630| 20 42 2c 42 24 2c 58 2c | 59 20 3a 20 58 3d 32 38 | B,B$,X,|Y : X=28|
|00005640| 0d 20 bc 0a c8 8e 20 61 | 20 ca 0d 20 c6 1b c9 20 |. .... a| .. ... |
|00005650| 31 20 3a 20 59 3d 38 32 | 34 20 3a 20 f2 63 6c 65 |1 : Y=82|4 : .cle|
|00005660| 61 72 28 31 29 0d 20 d0 | 1b c9 20 32 20 3a 20 59 |ar(1). .|.. 2 : Y|
|00005670| 3d 32 34 20 20 3a 20 f2 | 63 6c 65 61 72 28 36 29 |=24 : .|clear(6)|
|00005680| 0d 20 da 05 cb 0d 20 e4 | 09 e6 20 38 2c 30 0d 20 |. .... .|.. 8,0. |
|00005690| ee 1f e3 20 42 3d 31 20 | b8 20 a9 28 61 24 29 20 |... B=1 |. .(a$) |
|000056a0| 3a 20 42 24 3d c1 61 24 | 2c 42 2c 31 29 0d 20 f8 |: B$=.a$|,B,1). .|
|000056b0| 1d e7 20 97 28 42 24 29 | 3c 3e 31 33 20 80 20 97 |.. .(B$)|<>13 . .|
|000056c0| 28 42 24 29 3c 3e 33 32 | 20 8c 0d 21 02 33 20 20 |(B$)<>32| ..!.3 |
|000056d0| 20 20 20 3a 20 c8 99 20 | 22 4f 53 5f 53 70 72 69 | : .. |"OS_Spri|
|000056e0| 74 65 4f 70 22 2c 32 39 | 30 2c 53 70 72 69 74 65 |teOp",29|0,Sprite|
|000056f0| 25 2c 63 24 2b 42 24 2c | 58 2c 59 2c 30 0d 21 0c |%,c$+B$,|X,Y,0.!.|
|00005700| 1a 20 20 20 20 20 3a 20 | e7 20 42 24 3d 22 29 22 |. : |. B$=")"|
|00005710| 20 8c 20 58 2b 3d 38 0d | 21 16 24 20 20 20 20 20 | . X+=8.|!.$ |
|00005720| 3a 20 e7 20 42 24 3d 22 | 4d 22 20 84 20 42 24 3d |: . B$="|M" . B$=|
|00005730| 22 57 22 20 8c 20 58 2b | 3d 31 36 0d 21 20 2d 20 |"W" . X+|=16.! - |
|00005740| 20 20 20 20 3a 20 e7 20 | 42 24 3d 22 49 22 20 84 | : . |B$="I" .|
|00005750| 20 42 24 3d 22 2e 22 20 | 84 20 42 24 3d 22 3a 22 | B$="." |. B$=":"|
|00005760| 20 8c 20 58 2d 3d 31 36 | 0d 21 2a 05 cd 0d 21 34 | . X-=16|.!*...!4|
|00005770| 12 58 2b 3d 33 30 20 3a | 20 57 3d a6 28 36 29 0d |.X+=30 :| W=.(6).|
|00005780| 21 3e 05 ed 0d 21 48 05 | e1 0d 21 52 05 3a 0d 21 |!>...!H.|..!R.:.!|
|00005790| 5c 14 dd 20 f2 6c 6f 6e | 67 52 61 6e 67 65 53 63 |\.. .lon|gRangeSc|
|000057a0| 61 6e 0d 21 66 1b ea 20 | 41 2c 42 2c 43 2c 58 2c |an.!f.. |A,B,C,X,|
|000057b0| 59 20 3a 20 f2 63 6c 65 | 61 72 28 33 29 0d 21 70 |Y : .cle|ar(3).!p|
|000057c0| 0e e7 20 44 28 32 29 3c | 30 20 8c 0d 21 7a 36 20 |.. D(2)<|0 ..!z6 |
|000057d0| 20 20 20 20 3a 20 f2 74 | 65 78 74 28 33 30 38 2c | : .t|ext(308,|
|000057e0| 37 30 38 2c 22 52 22 2c | 22 54 48 45 20 4c 4f 4e |708,"R",|"THE LON|
|000057f0| 47 20 52 41 4e 47 45 20 | 53 45 4e 53 4f 52 53 22 |G RANGE |SENSORS"|
|00005800| 29 0d 21 84 35 20 20 20 | 20 20 3a 20 f2 74 65 78 |).!.5 | : .tex|
|00005810| 74 28 33 30 38 2c 36 35 | 36 2c 22 52 22 2c 22 41 |t(308,65|6,"R","A|
|00005820| 52 45 20 44 41 4d 41 47 | 45 44 20 2e 2e 2e 2e 2e |RE DAMAG|ED .....|
|00005830| 22 29 20 3a 20 e1 0d 21 | 8e 05 cd 0d 21 98 1b 59 |") : ..!|....!..Y|
|00005840| 3d 36 36 34 20 3a 20 e3 | 20 41 3d 51 31 2d 31 20 |=664 : .| A=Q1-1 |
|00005850| b8 20 51 31 2b 31 0d 21 | a2 24 58 3d 33 32 38 20 |. Q1+1.!|.$X=328 |
|00005860| 3a 20 4e 28 31 29 3d 30 | 20 3a 20 4e 28 32 29 3d |: N(1)=0| : N(2)=|
|00005870| 30 20 3a 20 4e 28 33 29 | 3d 30 0d 21 ac 13 e3 20 |0 : N(3)|=0.!... |
|00005880| 42 3d 51 32 2d 31 20 b8 | 20 51 32 2b 31 0d 21 b6 |B=Q2-1 .| Q2+1.!.|
|00005890| 3e e7 20 41 3e 30 20 80 | 20 41 3c 39 20 80 20 42 |>. A>0 .| A<9 . B|
|000058a0| 3e 30 20 80 20 42 3c 39 | 20 8c 20 4e 28 42 2d 51 |>0 . B<9| . N(B-Q|
|000058b0| 32 2b 32 29 3d 47 28 41 | 2c 42 29 20 3a 20 5a 28 |2+2)=G(A|,B) : Z(|
|000058c0| 41 2c 42 29 3d 47 28 41 | 2c 42 29 0d 21 c0 05 ed |A,B)=G(A|,B).!...|
|000058d0| 0d 21 ca 0d e3 20 43 3d | 31 20 b8 20 33 0d 21 d4 |.!... C=|1 . 3.!.|
|000058e0| 1a e6 20 38 20 3a 20 c8 | 93 20 c8 90 20 58 2c 59 |.. 8 : .|. .. X,Y|
|000058f0| 2c 32 30 38 2c 38 34 0d | 21 de 29 e7 20 41 3d 51 |,208,84.|!.). A=Q|
|00005900| 31 20 80 20 43 3d 32 20 | 8c 20 e6 20 33 20 3a 20 |1 . C=2 |. . 3 : |
|00005910| c8 93 20 c8 90 20 58 2c | 59 2c 32 30 38 2c 38 34 |.. .. X,|Y,208,84|
|00005920| 0d 21 e8 1e e6 20 30 20 | 3a 20 c8 93 20 c8 90 20 |.!... 0 |: .. .. |
|00005930| 58 2b 34 2c 59 2b 34 2c | 32 30 30 2c 37 36 0d 21 |X+4,Y+4,|200,76.!|
|00005940| f2 33 e7 20 4e 28 43 29 | 3d 30 20 20 8c 20 f2 74 |.3. N(C)|=0 . .t|
|00005950| 65 78 74 28 58 2b 32 36 | 2c 59 2b 31 32 2c 22 57 |ext(X+26|,Y+12,"W|
|00005960| 22 2c 22 20 20 20 22 29 | 20 3a 20 e5 20 8d 54 6e |"," ")| : . .Tn|
|00005970| 62 0d 21 fc 35 e7 20 4e | 28 43 29 3d 2d 31 20 8c |b.!.5. N|(C)=-1 .|
|00005980| 20 f2 74 65 78 74 28 58 | 2b 33 32 2c 59 2b 32 34 | .text(X|+32,Y+24|
|00005990| 2c 22 59 22 2c 22 2a 20 | 2a 20 2a 22 29 20 3a 20 |,"Y","* |* *") : |
|000059a0| e5 20 8d 54 6e 62 0d 22 | 06 17 71 24 3d c2 c3 28 |. .Tnb."|..q$=..(|
|000059b0| 4e 28 43 29 2b 31 30 30 | 30 29 2c 33 29 0d 22 10 |N(C)+100|0),3).".|
|000059c0| 28 6b 24 3d c0 71 24 2c | 31 29 20 20 3a 20 f2 74 |(k$=.q$,|1) : .t|
|000059d0| 65 78 74 28 58 2b 33 32 | 2c 59 2b 32 34 2c 22 52 |ext(X+32|,Y+24,"R|
|000059e0| 22 2c 6b 24 29 0d 22 1a | 29 73 24 3d c1 71 24 2c |",k$).".|)s$=.q$,|
|000059f0| 32 2c 31 29 20 3a 20 f2 | 74 65 78 74 28 58 2b 39 |2,1) : .|text(X+9|
|00005a00| 36 2c 59 2b 32 34 2c 22 | 42 22 2c 73 24 29 0d 22 |6,Y+24,"|B",s$)."|
|00005a10| 24 28 70 24 3d c2 71 24 | 2c 31 29 20 3a 20 f2 74 |$(p$=.q$|,1) : .t|
|00005a20| 65 78 74 28 58 2b 31 36 | 30 2c 59 2b 32 34 2c 22 |ext(X+16|0,Y+24,"|
|00005a30| 59 22 2c 70 24 29 0d 22 | 2e 0e 58 2b 3d 32 32 30 |Y",p$)."|..X+=220|
|00005a40| 20 3a 20 ed 0d 22 38 0e | 59 2d 3d 39 36 20 20 3a | : .."8.|Y-=96 :|
|00005a50| 20 ed 0d 22 42 2d f2 66 | 6f 6e 74 28 33 32 38 2c | .."B-.f|ont(328,|
|00005a60| 34 36 30 2c 31 2c 22 31 | 20 2d 20 4e 55 4d 42 45 |460,1,"1| - NUMBE|
|00005a70| 52 20 4f 46 20 4b 4c 49 | 4e 47 4f 4e 53 22 29 0d |R OF KLI|NGONS").|
|00005a80| 22 4c 2e f2 66 6f 6e 74 | 28 33 32 38 2c 34 32 34 |"L..font|(328,424|
|00005a90| 2c 35 2c 22 32 20 2d 20 | 4e 55 4d 42 45 52 20 4f |,5,"2 - |NUMBER O|
|00005aa0| 46 20 53 54 41 52 42 41 | 53 45 53 22 29 0d 22 56 |F STARBA|SES")."V|
|00005ab0| 2a f2 66 6f 6e 74 28 33 | 32 38 2c 33 38 34 2c 33 |*.font(3|28,384,3|
|00005ac0| 2c 22 33 20 2d 20 4e 55 | 4d 42 45 52 20 4f 46 20 |,"3 - NU|MBER OF |
|00005ad0| 53 54 41 52 53 22 29 0d | 22 60 05 e1 0d 22 6a 05 |STARS").|"`..."j.|
|00005ae0| 3a 0d 22 74 12 dd 20 f2 | 63 6f 6d 70 75 74 65 72 |:."t.. .|computer|
|00005af0| 4d 61 70 0d 22 7e 0f ea | 20 41 2c 42 2c 43 2c 58 |Map."~..| A,B,C,X|
|00005b00| 2c 59 0d 22 88 25 f2 63 | 6c 65 61 72 28 31 29 20 |,Y.".%.c|lear(1) |
|00005b10| 3a 20 f2 63 6c 65 61 72 | 28 33 29 20 3a 20 f2 63 |: .clear|(3) : .c|
|00005b20| 6c 65 61 72 28 36 29 0d | 22 92 0f e7 20 44 28 31 |lear(6).|"... D(1|
|00005b30| 31 29 3c 30 20 8c 0d 22 | 9c 37 20 20 20 20 20 3a |1)<0 .."|.7 :|
|00005b40| 20 f2 74 65 78 74 28 33 | 30 38 2c 37 30 38 2c 22 | .text(3|08,708,"|
|00005b50| 52 22 2c 22 54 48 45 20 | 43 45 4e 54 52 41 4c 20 |R","THE |CENTRAL |
|00005b60| 43 4f 4d 50 55 54 45 52 | 20 49 53 22 29 0d 22 a6 |COMPUTER| IS").".|
|00005b70| 31 20 20 20 20 20 3a 20 | f2 74 65 78 74 28 33 30 |1 : |.text(30|
|00005b80| 38 2c 36 35 36 2c 22 52 | 22 2c 22 44 41 4d 41 47 |8,656,"R|","DAMAG|
|00005b90| 45 44 20 2e 2e 2e 2e 2e | 22 29 20 3a 20 e1 0d 22 |ED .....|") : .."|
|00005ba0| b0 05 cd 0d 22 ba 15 59 | 3d 37 30 38 20 3a 20 e3 |...."..Y|=708 : .|
|00005bb0| 20 41 3d 30 20 b8 20 38 | 0d 22 c4 15 58 3d 33 30 | A=0 . 8|."..X=30|
|00005bc0| 34 20 3a 20 e3 20 42 3d | 30 20 b8 20 39 0d 22 ce |4 : . B=|0 . 9.".|
|00005bd0| 17 e7 20 41 3e 30 20 80 | 20 42 3e 30 20 80 20 42 |.. A>0 .| B>0 . B|
|00005be0| 3c 39 20 8c 0d 22 d8 20 | 20 20 20 20 20 3a 20 e6 |<9 ..". | : .|
|00005bf0| 20 38 20 3a 20 c8 93 20 | c8 90 20 58 2c 59 2c 38 | 8 : .. |.. X,Y,8|
|00005c00| 30 2c 34 34 0d 22 e2 24 | 20 20 20 20 20 3a 20 e6 |0,44.".$| : .|
|00005c10| 20 30 20 3a 20 c8 93 20 | c8 90 20 58 2b 34 2c 59 | 0 : .. |.. X+4,Y|
|00005c20| 2b 34 2c 37 32 2c 33 36 | 0d 22 ec 05 cd 0d 22 f6 |+4,72,36|."....".|
|00005c30| 17 e7 20 41 3d 30 20 80 | 20 42 3e 30 20 80 20 42 |.. A=0 .| B>0 . B|
|00005c40| 3c 39 20 8c 0d 23 00 22 | 20 20 20 20 20 3a 20 f2 |<9 ..#."| : .|
|00005c50| 66 6f 6e 74 28 58 2b 33 | 32 2c 59 2b 33 36 2c 37 |font(X+3|2,Y+36,7|
|00005c60| 2c c3 28 42 29 29 0d 23 | 0a 05 cd 0d 23 14 19 e7 |,.(B)).#|....#...|
|00005c70| 20 41 3e 30 20 80 20 28 | 42 3d 30 20 84 20 42 3d | A>0 . (|B=0 . B=|
|00005c80| 39 29 20 8c 0d 23 1e 22 | 20 20 20 20 20 3a 20 f2 |9) ..#."| : .|
|00005c90| 66 6f 6e 74 28 58 2b 31 | 32 2c 59 2b 33 36 2c 37 |font(X+1|2,Y+36,7|
|00005ca0| 2c c3 28 41 29 29 0d 23 | 28 05 cd 0d 23 32 17 e7 |,.(A)).#|(...#2..|
|00005cb0| 20 41 3e 30 20 80 20 42 | 3e 30 20 80 20 42 3c 39 | A>0 . B|>0 . B<9|
|00005cc0| 20 8c 0d 23 3c 33 e7 20 | 5a 28 41 2c 42 29 3d 30 | ..#<3. |Z(A,B)=0|
|00005cd0| 20 20 8c 20 f2 66 6f 6e | 74 28 58 2b 31 30 2c 59 | . .fon|t(X+10,Y|
|00005ce0| 2b 33 36 2c 37 2c 22 20 | 20 20 22 29 20 3a 20 e5 |+36,7," | ") : .|
|00005cf0| 20 8d 44 6e 63 0d 23 46 | 33 e7 20 5a 28 41 2c 42 | .Dnc.#F|3. Z(A,B|
|00005d00| 29 3d 2d 31 20 8c 20 f2 | 66 6f 6e 74 28 58 2b 31 |)=-1 . .|font(X+1|
|00005d10| 30 2c 59 2b 33 36 2c 33 | 2c 22 2a 2a 2a 22 29 20 |0,Y+36,3|,"***") |
|00005d20| 3a 20 e5 20 8d 44 6e 63 | 0d 23 50 11 43 3d 5a 28 |: . .Dnc|.#P.C=Z(|
|00005d30| 41 2c 42 29 2b 31 30 30 | 30 0d 23 5a 1f f2 66 6f |A,B)+100|0.#Z..fo|
|00005d40| 6e 74 28 58 2b 31 32 2c | 59 2b 33 36 2c 37 2c c2 |nt(X+12,|Y+36,7,.|
|00005d50| c3 28 43 29 2c 33 29 29 | 0d 23 64 05 cd 0d 23 6e |.(C),3))|.#d...#n|
|00005d60| 0b e7 20 42 3e 30 20 8c | 0d 23 78 10 20 20 20 20 |.. B>0 .|.#x. |
|00005d70| 20 3a 20 58 2b 3d 37 38 | 0d 23 82 0d cc 20 3a 20 | : X+=78|.#... : |
|00005d80| 58 2b 3d 33 36 0d 23 8c | 05 cd 0d 23 96 05 ed 0d |X+=36.#.|...#....|
|00005d90| 23 a0 0b e7 20 41 3e 30 | 20 8c 0d 23 aa 10 20 20 |#... A>0| ..#.. |
|00005da0| 20 20 20 3a 20 59 2d 3d | 34 34 0d 23 b4 0d cc 20 | : Y-=|44.#... |
|00005db0| 3a 20 59 2d 3d 34 30 0d | 23 be 05 cd 0d 23 c8 05 |: Y-=40.|#....#..|
|00005dc0| ed 0d 23 d2 27 58 3d 32 | 36 32 2b 28 51 32 2a 37 |..#.'X=2|62+(Q2*7|
|00005dd0| 38 29 20 3a 20 59 3d 37 | 31 32 2d 28 51 31 2a 34 |8) : Y=7|12-(Q1*4|
|00005de0| 34 29 20 3a 20 e6 20 33 | 0d 23 dc 38 c8 93 20 58 |4) : . 3|.#.8.. X|
|00005df0| 2c 59 2c 37 38 2c 34 34 | 20 3a 20 86 20 58 2b 32 |,Y,78,44| : . X+2|
|00005e00| 2c 59 2c 58 2b 32 2c 59 | 2b 34 34 20 3a 20 86 20 |,Y,X+2,Y|+44 : . |
|00005e10| 58 2b 38 30 2c 59 2c 58 | 2b 38 30 2c 59 2b 34 34 |X+80,Y,X|+80,Y+44|
|00005e20| 0d 23 e6 05 e1 0d 23 f0 | 05 3a 0d 23 fa 21 dd 20 |.#....#.|.:.#.!. |
|00005e30| a4 69 6e 70 75 74 28 78 | 25 2c 79 25 2c 78 31 2c |.input(x|%,y%,x1,|
|00005e40| 79 31 2c 63 25 2c 61 24 | 2c 6e 29 0d 24 04 21 f2 |y1,c%,a$|,n).$.!.|
|00005e50| 66 6f 6e 74 28 78 25 2c | 79 25 2c 63 25 2c 61 24 |font(x%,|y%,c%,a$|
|00005e60| 29 20 3a 20 54 65 6d 70 | 24 3d 22 22 0d 24 0e 18 |) : Temp|$="".$..|
|00005e70| f5 20 3a 20 f5 20 3a 20 | 47 3d a5 20 3a 20 fd 20 |. : . : |G=. : . |
|00005e80| 47 3e 31 32 0d 24 18 30 | e7 20 a7 22 30 31 32 33 |G>12.$.0|. ."0123|
|00005e90| 34 35 36 37 38 39 2e 22 | 2c bd 28 47 29 29 3c 3e |456789."|,.(G))<>|
|00005ea0| 30 20 8c 20 54 65 6d 70 | 24 3d 54 65 6d 70 24 2b |0 . Temp|$=Temp$+|
|00005eb0| bd 28 47 29 0d 24 22 26 | e7 20 47 3d 31 32 37 20 |.(G).$"&|. G=127 |
|00005ec0| 8c 20 54 65 6d 70 24 3d | c0 54 65 6d 70 24 2c a9 |. Temp$=|.Temp$,.|
|00005ed0| 28 54 65 6d 70 24 29 2d | 31 29 0d 24 2c 31 e7 20 |(Temp$)-|1).$,1. |
|00005ee0| a9 28 54 65 6d 70 24 29 | 3e 6e 20 8c 20 ef 20 37 |.(Temp$)|>n . . 7|
|00005ef0| 20 3a 20 54 65 6d 70 24 | 3d c0 54 65 6d 70 24 2c | : Temp$|=.Temp$,|
|00005f00| a9 28 54 65 6d 70 24 29 | 2d 31 29 0d 24 36 19 e7 |.(Temp$)|-1).$6..|
|00005f10| 20 54 65 6d 70 24 3c 22 | 22 20 8c 20 54 65 6d 70 | Temp$<"|" . Temp|
|00005f20| 24 3d 22 22 0d 24 40 20 | e6 20 30 20 3a 20 c8 93 |$="".$@ |. 0 : ..|
|00005f30| 20 c8 90 20 78 31 2c 79 | 31 2d 33 32 2c 6e 2a 32 | .. x1,y|1-32,n*2|
|00005f40| 30 2c 33 32 0d 24 4a 32 | e7 20 54 65 6d 70 24 3e |0,32.$J2|. Temp$>|
|00005f50| 22 22 20 80 20 54 65 6d | 70 24 3c bd 31 32 37 20 |"" . Tem|p$<.127 |
|00005f60| 8c 20 f2 66 6f 6e 74 28 | 78 31 2c 79 31 2c 31 2c |. .font(|x1,y1,1,|
|00005f70| 54 65 6d 70 24 29 0d 24 | 54 1c fd 20 47 3d 31 33 |Temp$).$|T.. G=13|
|00005f80| 20 3a 20 e7 20 54 65 6d | 70 24 3d 22 22 20 8c 20 | : . Tem|p$="" . |
|00005f90| 3d 30 0d 24 5e 0d 3d bb | 28 54 65 6d 70 24 29 0d |=0.$^.=.|(Temp$).|
|00005fa0| 24 68 05 3a 0d 24 72 22 | dd 20 a4 69 6e 70 75 74 |$h.:.$r"|. .input|
|00005fb0| 32 28 78 25 2c 79 25 2c | 78 31 2c 79 31 2c 63 25 |2(x%,y%,|x1,y1,c%|
|00005fc0| 2c 61 24 2c 6e 29 0d 24 | 7c 21 f2 66 6f 6e 74 28 |,a$,n).$||!.font(|
|00005fd0| 78 25 2c 79 25 2c 63 25 | 2c 61 24 29 20 3a 20 54 |x%,y%,c%|,a$) : T|
|00005fe0| 65 6d 70 24 3d 22 22 0d | 24 86 18 f5 20 3a 20 f5 |emp$="".|$... : .|
|00005ff0| 20 3a 20 47 3d a5 20 3a | 20 fd 20 47 3e 31 32 0d | : G=. :| . G>12.|
|00006000| 24 90 40 e7 20 a7 22 41 | 42 43 44 45 46 47 48 49 |$.@. ."A|BCDEFGHI|
|00006010| 4a 4b 4c 4d 4e 4f 50 51 | 52 53 54 55 56 57 58 59 |JKLMNOPQ|RSTUVWXY|
|00006020| 5a 20 22 2c bd 28 47 29 | 29 3c 3e 30 20 8c 20 54 |Z ",.(G)|)<>0 . T|
|00006030| 65 6d 70 24 3d 54 65 6d | 70 24 2b bd 28 47 29 0d |emp$=Tem|p$+.(G).|
|00006040| 24 9a 26 e7 20 47 3d 31 | 32 37 20 8c 20 54 65 6d |$.&. G=1|27 . Tem|
|00006050| 70 24 3d c0 54 65 6d 70 | 24 2c a9 28 54 65 6d 70 |p$=.Temp|$,.(Temp|
|00006060| 24 29 2d 31 29 0d 24 a4 | 31 e7 20 a9 28 54 65 6d |$)-1).$.|1. .(Tem|
|00006070| 70 24 29 3e 6e 20 8c 20 | ef 20 37 20 3a 20 54 65 |p$)>n . |. 7 : Te|
|00006080| 6d 70 24 3d c0 54 65 6d | 70 24 2c a9 28 54 65 6d |mp$=.Tem|p$,.(Tem|
|00006090| 70 24 29 2d 31 29 0d 24 | ae 19 e7 20 54 65 6d 70 |p$)-1).$|... Temp|
|000060a0| 24 3c 22 22 20 8c 20 54 | 65 6d 70 24 3d 22 22 0d |$<"" . T|emp$="".|
|000060b0| 24 b8 20 e6 20 30 20 3a | 20 c8 93 20 c8 90 20 78 |$. . 0 :| .. .. x|
|000060c0| 31 2c 79 31 2d 33 32 2c | 6e 2a 32 30 2c 33 32 0d |1,y1-32,|n*20,32.|
|000060d0| 24 c2 32 e7 20 54 65 6d | 70 24 3e 22 22 20 80 20 |$.2. Tem|p$>"" . |
|000060e0| 54 65 6d 70 24 3c bd 31 | 32 37 20 8c 20 f2 66 6f |Temp$<.1|27 . .fo|
|000060f0| 6e 74 28 78 31 2c 79 31 | 2c 31 2c 54 65 6d 70 24 |nt(x1,y1|,1,Temp$|
|00006100| 29 0d 24 cc 0a fd 20 47 | 3d 31 33 0d 24 d6 0a 3d |).$... G|=13.$..=|
|00006110| 54 65 6d 70 24 0d 24 e0 | 05 3a 0d 24 ea 25 dd 20 |Temp$.$.|.:.$.%. |
|00006120| a4 69 6e 70 75 74 4e 75 | 6d 62 65 72 28 78 25 2c |.inputNu|mber(x%,|
|00006130| 79 25 2c 78 31 2c 79 31 | 2c 63 24 2c 61 24 29 0d |y%,x1,y1|,c$,a$).|
|00006140| 24 f4 21 f2 74 65 78 74 | 28 78 25 2c 79 25 2c 63 |$.!.text|(x%,y%,c|
|00006150| 24 2c 61 24 29 20 3a 20 | 54 65 6d 70 24 3d 22 22 |$,a$) : |Temp$=""|
|00006160| 0d 24 fe 18 f5 20 3a 20 | f5 20 3a 20 47 3d a5 20 |.$... : |. : G=. |
|00006170| 3a 20 fd 20 47 3e 31 32 | 0d 25 08 1f e7 20 a7 22 |: . G>12|.%... ."|
|00006180| 30 31 32 33 34 35 36 37 | 38 39 2e 22 2c bd 28 47 |01234567|89.",.(G|
|00006190| 29 29 3c 3e 30 20 8c 0d | 25 12 1b 20 20 20 20 20 |))<>0 ..|%.. |
|000061a0| 3a 20 54 65 6d 70 24 3d | 54 65 6d 70 24 2b bd 28 |: Temp$=|Temp$+.(|
|000061b0| 47 29 0d 25 1c 05 cd 0d | 25 26 26 e7 20 47 3d 31 |G).%....|%&&. G=1|
|000061c0| 32 37 20 8c 20 54 65 6d | 70 24 3d c0 54 65 6d 70 |27 . Tem|p$=.Temp|
|000061d0| 24 2c a9 28 54 65 6d 70 | 24 29 2d 31 29 0d 25 30 |$,.(Temp|$)-1).%0|
|000061e0| 19 e7 20 54 65 6d 70 24 | 3c 22 22 20 8c 20 54 65 |.. Temp$|<"" . Te|
|000061f0| 6d 70 24 3d 22 22 0d 25 | 3a 1c e6 20 30 20 3a 20 |mp$="".%|:.. 0 : |
|00006200| c8 93 20 c8 90 20 78 31 | 2c 79 31 2c 31 30 38 2c |.. .. x1|,y1,108,|
|00006210| 34 30 0d 25 44 34 e7 20 | 54 65 6d 70 24 3e 22 22 |40.%D4. |Temp$>""|
|00006220| 20 80 20 54 65 6d 70 24 | 3c bd 31 32 37 20 8c 20 | . Temp$|<.127 . |
|00006230| f2 74 65 78 74 28 78 31 | 2c 79 31 2c 22 52 22 2c |.text(x1|,y1,"R",|
|00006240| 54 65 6d 70 24 29 0d 25 | 4e 1c fd 20 47 3d 31 33 |Temp$).%|N.. G=13|
|00006250| 20 3a 20 e7 20 54 65 6d | 70 24 3d 22 22 20 8c 20 | : . Tem|p$="" . |
|00006260| 3d 30 0d 25 58 0d 3d bb | 28 54 65 6d 70 24 29 0d |=0.%X.=.|(Temp$).|
|00006270| 25 62 05 3a 0d 25 6c 26 | dd 20 a4 69 6e 70 75 74 |%b.:.%l&|. .input|
|00006280| 56 61 72 69 6f 75 73 28 | 78 25 2c 79 25 2c 78 31 |Various(|x%,y%,x1|
|00006290| 2c 79 31 2c 63 24 2c 61 | 24 29 0d 25 76 21 f2 74 |,y1,c$,a|$).%v!.t|
|000062a0| 65 78 74 28 78 25 2c 79 | 25 2c 63 24 2c 61 24 29 |ext(x%,y|%,c$,a$)|
|000062b0| 20 3a 20 54 65 6d 70 24 | 3d 22 22 0d 25 80 18 f5 | : Temp$|="".%...|
|000062c0| 20 3a 20 f5 20 3a 20 47 | 3d a5 20 3a 20 fd 20 47 | : . : G|=. : . G|
|000062d0| 3e 31 32 0d 25 8a 39 e7 | 20 a7 22 30 31 32 33 34 |>12.%.9.| ."01234|
|000062e0| 35 36 37 38 39 2e 41 42 | 43 44 45 46 47 48 49 4a |56789.AB|CDEFGHIJ|
|000062f0| 4b 4c 4d 4e 4f 50 51 52 | 53 54 55 56 57 58 59 5a |KLMNOPQR|STUVWXYZ|
|00006300| 22 2c bd 28 47 29 29 3c | 3e 30 20 8c 0d 25 94 1b |",.(G))<|>0 ..%..|
|00006310| 20 20 20 20 20 3a 20 54 | 65 6d 70 24 3d 54 65 6d | : T|emp$=Tem|
|00006320| 70 24 2b bd 28 47 29 0d | 25 9e 05 cd 0d 25 a8 26 |p$+.(G).|%....%.&|
|00006330| e7 20 47 3d 31 32 37 20 | 8c 20 54 65 6d 70 24 3d |. G=127 |. Temp$=|
|00006340| c0 54 65 6d 70 24 2c a9 | 28 54 65 6d 70 24 29 2d |.Temp$,.|(Temp$)-|
|00006350| 31 29 0d 25 b2 19 e7 20 | 54 65 6d 70 24 3c 22 22 |1).%... |Temp$<""|
|00006360| 20 8c 20 54 65 6d 70 24 | 3d 22 22 0d 25 bc 1c e6 | . Temp$|="".%...|
|00006370| 20 30 20 3a 20 c8 93 20 | c8 90 20 78 31 2c 79 31 | 0 : .. |.. x1,y1|
|00006380| 2c 31 32 38 2c 34 30 0d | 25 c6 34 e7 20 54 65 6d |,128,40.|%.4. Tem|
|00006390| 70 24 3e 22 22 20 80 20 | 54 65 6d 70 24 3c bd 31 |p$>"" . |Temp$<.1|
|000063a0| 32 37 20 8c 20 f2 74 65 | 78 74 28 78 31 2c 79 31 |27 . .te|xt(x1,y1|
|000063b0| 2c 22 52 22 2c 54 65 6d | 70 24 29 0d 25 d0 0a fd |,"R",Tem|p$).%...|
|000063c0| 20 47 3d 31 33 0d 25 da | 0a 3d 54 65 6d 70 24 0d | G=13.%.|.=Temp$.|
|000063d0| 25 e4 05 3a 0d 25 ee 12 | dd 20 f2 63 6f 6d 6d 61 |%..:.%..|. .comma|
|000063e0| 6e 64 49 6e 66 6f 0d 25 | f8 1f ea 20 58 2c 59 2c |ndInfo.%|... X,Y,|
|000063f0| 61 24 2c 62 24 20 3a 20 | 58 3d 33 30 38 20 3a 20 |a$,b$ : |X=308 : |
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
